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音楽 と 漢字 で 断然 差 が 


MSX が ゲー ム だ け で は も っ た いな い 。 ヤ マハ な ら 「 拡 張 ユ ニッ ト 」 を 半 着 する だ 


SFG-01 を BASIC で コン 
トロ ー ル する 。 「 YRM-11 


FM 音源 に よる 演奏 を し な が ら グ ラフ ィ 
ッ ク 画 面 を 楽し ん だ り 、 効 果 音 を 創っ た 
りす る こと が BASIC ブ ログ ラム で 可能 。 
音声 合成 機能 に より 、 MSX に し ゃ べら 
せ た り 誤 わ せ た り する こと も で きま す 。 
FM ミュ ー ジ ッ ク マ クロ 


YRM-| \7.800 
(RAM 容 量 は 32KB 以 上 必要 ) 


本 格 的 な 音楽 マシ ン へ 
の 立役者 は これ 。 SFG-01 
リア ル な 「FM 音 源 」 で 48 種 の 音色 デー 
タ を 内 大 。 最 大 8 音 の 同時 発音 可能 で 、 


| し か も 各 音 個別 の 音色 設定 可能 . 豊富 
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り を 楽し め る 。 YRM-12 


SFG-01| を コン トロ ー ル し て 、 画面 を 見 な 
が ら デ ー タ を 入れ て 自分 だ け の オリ ジ 
ナル な 音色 を 創り あげ ける こと が で きま 
す 。 作成 し た デー タ は カセ ッ ト に 保存 で 
き 、YRM-1 な ど で 利 用 で きま す 


FM 音色 フロ グラ ム 、 
YRM-I2 \7.800 
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な ソフ ト や 周辺 機 対 と の 組合 せ で 、 自 

動 演奏 は も ちろ 人 ん 、 新 し い 音 創り ・ 曲 創 

りや 音声 合成 まで 自在 に 楽し め ま す 
記 い rosa 


FM サウ ント 

シン セ サ イ ザ ユ ニット 
SFG-0| \I9.800 

(YIS 503 303 は 直接 、 各 社 
製品 に は UCN-0| を 介し て 、 
接続 する こと が で きま す ) 


MSX マ シン を 自動 演奏 さ 
せる の は これ 。 YRM-15 


画面 上 で 音符 な ど を 入力 する と 自動 的 
に 譜面 化 さ れ 、 そ の 曲 を 自動 演奏 させ 
て 楽し め る 他 、 楽 譜 を プリ ント アウ ト す 
る こと も 可能 。 入 れ た デー タ の 訂正 ・ 削 
除 も 簡単 で 、 カセ ッ ト に 保存 も で きま す 


FM ミュ ー ジ ッ ク コ ン ホ ー ザ 
YRM-I5 Y7800 


ミュ ー ジ ッ ク キ ー ポ ボー ド 
FM サウ ンド シン セ サ イ ザ ユ ニッ ト に 接 
続 し て 、MSX マ シン を ミュ ー ジ ッ ク シ ン 
セ サ イ ザ と し て 活用 で きま す 


ミュ ー ジ ッ ク キ ー ボ ー ド 
YK-I0 \29.800(49 鍵 ) 


ミュ ー ジ ッ ク キ ー ボ ー ド 
YK-0! 17.800(44 鍵 ) 


プレ イカ ー ド で MSX が 鮮 
や か に 自動 演奏 。 ZPA-01 

ポー タ サ ウン ド で お な じみ の プレ イカ ー 
ド を カー ドリ ー タ ー に 通す だ け で コン ピ 
ュー タ が 目 動 演奏 . 音量 や テン ボ 、 調 も 
自由 に 変え られ 、 画 面 に は 演奏 内 容 を 
表示 . 引 G-0! と 併用 すれ ば FM 音源 に 


フレ イカ ー ド セッ ト 
BA-0| \|I2.800 


拡張 性 に 差 を つけ る サイ ドス ロッ ト 」 と | リア スロ ッ ト ,」 。 そ し て 、 RAMG64K 拡 張 も OK。 


本 体 右 上 の 「ROM カ ー ト リッ ジス ロッ ト 」 


は MSX マ シン に 標準 の スロ ッ ト 。 だ か ら 
ゲー ム は も ちろ ん 、「 ミ ュー ジッ ク 」 や 「 グ 
ラフ ィ ッ ク 」 な ど 、 市 販 の MSX 用 カー ト 
リッ ジ ソ フ ト を すべ て 楽し め ま す 。 


「 こ こ が 違 う 」 の 決定 打 は この 「 サイ ドス 
ロッ ト 」。 ヤマ ハ 独 自 の 「 拡張 ユニ ッ ト 」 を 
直接 装着 し て 本 体内 に 格納 で き 、 マ シ 
ン を 本 格 的 な 「 ミ ュー ジッ クコ ンピュータ 」 
や 「 ワ ー プ ロ シ ス テム 」 に 変身 させ ます 。 


MSX マ ー ク は マイ クロ ソフ ト 社 の 商標 で す 


そ し て き ぁ に は トリ アス ロッ ト 」。YIS 
503 だ げ の スズ スロット ド で 、 シ ング ルル カー ド 
リッ ジア ダフ タ を 介し て 各種 カー トリ ッ 
ジ を 接続 使用 で きる た め 、 コ ンピュータ 
活用 機能 の 質 と 量 が 大 幅 に 広がり ます 


64K DOS 対 応 


沈 秋 発売 予定 提 4%o 人 < 


て の MSX 仕様 ソフ ト は RAM 32K で 使え ま 
す , フロ ッ ピ ー デ ティ スク ドラ イブ を 接続 し て 
も DISK-BASIC で 使う 場合 は 32K の まま 
で よく 、64K の 必要 は あり ませ ん 。 DOS 
を 使う 場合 に 64K 必 要 と な り ま す 。 SRM 
-01| を サイ ドス ロッ ト に 装着 する こと て 、 
YIS-503 の RAM 容 量 は 64K に 拡張 され 、 
これ に 対応 で きま す 
また 、 鮮 明 画 像 が 得 
られ る 21 ピ ビン RGB 出 
力も 内 蔵 し て いま す 。 


32K RAM RGB ユ ニッ ト ・ 
SRM-0| 今秋 発売 予定 


つく 〈、 ヤ マル MSX 


$⑱) YAMAHA 


け で ' 音 楽 」 や ! ワ ー プ ブロ 」 を 本 格 的 に 楽し め ま す 
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回 晶 目 奉 、 ス ピー ディ ー 交 再 勤 


本 格 的 ワー プロ シス テム を 手軽 に 実現 。SKW-01 


な の な 


旧 沙 字 ワー プロ ユニ ッ ト . の 特徴 を 活か す の は 、 


NO01.。 


各種 用 紙 対 応 で 静 下 美 能 印 字 の P 


「 封 転写 プリ ンタ 」 PN-01 は ao 

極め て 便利 な 各種 用 紙 対 応 
型 で 、A4・B5 紙 や 連続 用 紙 
は も ちろ ん 、 ハ ガキ や 名 刺 に 
も 直接 プリ ント で きま す 。 
高密 度 |6 ド ッ ト ヘ ッ ド に よ 
り | パ ス ( 行 程 ) で 美しく 、 静 
粛 に 印字 可能 。MSX 準拠 で 
ワー プロ 用 だ け で な く 、 通 常 
の プリ ンタ と し て も 高 性 能 。 


執 転写 フリ ンタ PN-0I| \89.800 
プリ ンタ ケー ブル CB-01 \5.000 

サー マル リボ ン ( 黒 ) PN-0IRB \3.900 
サー マル リボ ン ( カ ラー) PN-0IRC \4.800 


ヤマ 人 ハ の 拡張 ユニ ッ ト を 
至 MSX ユ ー ザ ー に 


ヤマ ハ の 拡張 ユニ ッ ト SFG-01、SKW 
-0| は 、 ユ ニッ トコ ネ ク タ UCN-01| を 介 
し て 各社 MSX コ ンピュータ の ROM 
カー トリ ッ ジ スロ ッ ト に 接続 で きま す 


y 注 : 但し 、 機種 に より 機能 を 十分 
に 発揮 で き な い 場合 も あり ます 


計ら ] ウー コロ 
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漢字 住所 録 の 作成 や ラベ ル 


「 漢 字 ワ ー フ プロ ユ ニッ ト 」SKW-01 は 、 
JIS 第 | 水準 を 含む 3564 文 字 種 内 蔵 に 
加え 、 特殊 文字 や 記号 の 作成 ・ 登 録 、 
吾 語 や 短文 の 登録 も 可能 で 、 こ れ ら は 


党 字 ワー フロ ユニ ッ ト 
SKW-01 \49.800 

(YIS 503 303 は 直接 、 各 社 
製品 に は UCN-01 を 介し て 
接続 する こと が で きま す ) 


電源 OFF で も 消え ませ ん 。 テ キス ト 表 
示 と レイ アウ ト 表 示 を 切換 えな が ら 、 
楽し く ス ピー ディ に 入力 / 編集 が で き 
ます 。 作成 文書 は 、 カ セッ ト や デー タ 
メモ リカ ー ト リッ ジ ( 容 量 4KB) で 記憶 ・ 
読出 し が 可能 。 手軽 で 本 格 的 な ホー 
ム & パ ー ソ ナル ワー プロ の 誕生 で す 。 


デー タメ モリ カー トリ ッ ジ 
UDC-0| \9.800 


El 刷 を する に は 。 YRM-16 


SKW-0I と 併用 し て 、MSX を 漢字 住所 
録 と し て 使う た め の 応 用 ソフ ト で 、 任意 
の 項目 で の 並べ 替え や 検索 も ス ヒ ー デ ィ 。 
死 名 ラベ ル や ハガキ な ど に 直接 宛名 E 
刷 す る こと が で き 、 実 に 便利 で す 。 


潤 字 住所 録 
YRM-16 \7.800 


ユニ ッ ト コ ネ ク タ 
UCN-01| \7.800 


圏 MSX 仕 様 の ソノ フト や 周辺 機器 すべ て に 対応 。 
y (通常 の カー トリ ッ ジ スロ ッ ト 、(② 独 自 の サイ ド 
スロ ッ ト 、(③ リ アス ロッ ト 、 と 3 種類 の スロ ッ ト を 
凌 備 し て 拡張 性 断然 。 了 必要 十分 の RAM32KB 
実装 。 プリ ンタ ボー ト も 装備 。 上 位 バ ー ジ ョ 
ン VDP で 色 ズ レ の な い 鮮 明 高 画質 画面 。y 使い 
易い キー 配置 の ステ ッ プ スカ ルプ チャ ー キ ー ボ ー ド 


ホー ム り パー ソン チル ヨン ピュ ー タ 
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一 MSX 仕 様 の 豊富 な ソフ ト が 楽し め ま す 。y だ 
か ら 、 カ ー ト リッ ジ ポ ン で 誰 も が 楽し め る ゲー ム 
マシ ン に 。 「 グ ラフ ィ ッ ク 」 も 「 教育 」 も 0K。y その 
上 で 、 ヤ マハ 独自 の 「 サ イド スロ ッ ト 」 を 装備 し て 、 
ヤマ ハ な ら で は の 「 ミ ュー ジッ ク 」 や 「 ワ ー プ ロ 」 な 
と の 拡張 ユニ ッ ト を ダイ レク ト に 接続 可能 。y 強 
力 な 拡張 性 で 楽し み も 実用 性 も 広がり ます 。 
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画 特報 ! ゲー ム か か ん た ん に 作れ る 賠 法 の RUM カ ー ト リッ ツ (MSX) が 出る ぞ / …… の 3 
圏 キ ミ の 作品 お 便り 募集 ? …… 大 ……ー ド ドド ーー Og 


テコ ズル パズル (添削 前 ) の 遊び 方 
その ムズ さ で に 
編集 部 は まい っ た / 


スペ ー ス ・ キ ー で ゲー ム ス タ ー ト 。 
画面 の 四角 の な か に 現れ る 重なっ た 文 
補 を あて で る と いう パズル 。 2 つの 廊 学 
が 重なる と 、 重 な っ た 部 分 が 反転 し て 
し まい 、 ちょ っ ら と 見 た だ は で は わけ が 
わか ら な い の だ 。 

レベ ル は 1 か ら ほ と ん ど と 無制限 に 設 
定 さ れる 。 レ ベル 1 で 1 文字 表示 ( こ 
れ は パズル に な ら な し り 、 レ ベル 2 で 2 
文字 が 画 な っ で で て くる 。 つま り 、 レ 
ベル の 数 だ け 文 字 が 重複 し て 表示 され 
どん どん 岩 し く な っ て いく の だ 。 

これ だ / と 思っ た 文字 の キー を 押 
す と 、 そ の 文字 の 形 が 反転 する よう に 


6 


か つの いる の で 、 あ た だ っ て い だ 司 その 
文字 の 形 だ けが 画面 か ら 消 える わけ 。 
GS も お 。 お まう つき を し て し まっ だ ら 、 
の 文字 も 画面 に 重なっ て 、 ま すま すわ 
けが わか ら な く な る の で くれ で ぐれ も お 
手つき だ け は 慎重 に 。 お 手つき し た な 
と 思っ た ら 、 す で ぐ もう一度 同じ キー を 
押せ ば 、 も と に も どる よ 。 

1 守 1 宇 、 ひっ うっ ぺ が し て い ぐ よ うに 
解い て いっ て 、 画 面 に な に も な く な っ 
た ら 完 成 。 レ ベル に 応じ て 、 完成 時 の 
コメ ント が 表示 され る 。 レ ベル 1 な ら 
ナチ ナ ャ ノコ サイ ザイ レベ バル]11ME 
な ら カミ ホ ポト ケ デ ス !!“ と いう 成 じ 。 

レベ ル 3 く らい な ら な ん と が で き な 
いで も が いけ ば けど 、4 く らい に な る と も 
うほ と ん ど お 手 あげ 状態 。 で も 、 作 者 
は レベ ル 6 を 解い た そう だ か ら 、 さ す 
が に 製作 者 は ちがう 。 


イコ ン 礎 1 年 


REM @e@e@@ By AKIRA .FUJINAKA @@@@@ 
DIM A$(11):FOR Il=9 TO 11:READ A$(1T):NEXT 


DATA アタ リマ エ タ ~ ヨ , オ チャ ノコ サイ サイ , マ ア マ ア 。 タダ " ネ 。 ス コ " イ ! 


1「。GOOD ! 


の だ ZH ル 7 
の と /7 戸 了 ア 7 


ロイ チー スネ ニッ シフ ウサ イー  ) 


DATA ホ ト ン ト ~ ヒ ~ ヨウ キ , テン サイ テ ~ ス ! , ヘン タイ タ ~ ナ 7? 。 キ チカ ^ イ カモ ネ ! ! 。 カ ミホ ト ケ デ “ ス !! 


WIDTH49,25:COLOR7,9:LINE(9,9)-(649,299) ,PSET , 2 ,BF 


SYMBOL( 69 , 3 ) , "テコ スル スル" 6.5,5:SYMBOL(59,29) 、 "テコ バル ルリ スル "6,5,6 


LOCATE11,15:PRINT "HIT SPACE KEY":K$=INKEY も : IF K$=" 


" THEN89 ELSE 79 


CLS:T=T+1:LOCATE19,1:INPUT "レベ ドル ハイ クツ こ シマ スカ "5AERANDOMIZE TIME/T 
LINE(13,5)-(25,17)," 較 "J、5,B:FOR I=1 TO A:B=INT(RND(10 ) \※222+32 ) 
SYMBOL( 239 ,55 ) ,CHR$(B) ,29,19,4,,XOR:FOR W=9 TO 50:NEXT:NEXT 


TIME$="99:99:99":LOCATE 13.3:PRINT "TIME=“ 
K$=INKEY$: R=RND( 1 ) x*39+19:PLAY"T255L15N=R:":LOCATE 19.3:PRINT TIME$ 
FOR X=239+19 TO 399 STEP 29:FOR Y=55+5 TO 134 STEP 19 

IF POINT(X.Y)=-1 THEN 169 
IF X=389 AND Y=139 AND POINT(389,139)=9 THEN 179 ELSE NEXT:NEXT 
SYMBOL(239 ,55) ,K$ も 29、19,4,,XOR:GOTO0129 
PLAY"S8t159115o5cdefcdefcccrfgbafgbafff" 
IF A<9 THEN A=9 ELSE IF A>11 THEN A=1ll 
SYMBOL(183.159) ,A$(A) ,4.2.5 
SYMBOL(182,149) ,A$(A),4.2.7:LOCATE13.22:PRINT"Replay 2 (Y/ZN}「 
A$=INKEY$:IFA$="Y"ORA$= "y "THEN59ELSEIFA$="N"ORA$="n"THENENDELSE209 


テコ ズル パズル (添削 前 ) プ ログ ラム 解説 


田 変 数 リス ト 90 
A$()…… コ メン ト 表 示 用 。A や : 30 40 
(1) な ら レ ベル 1 用 の コ ・ 50- 70 
メン ト 、A$S (0) な ら : 80 
レベ ル 11 以 上 用 の コメ : 90-100 
ント が 入る 5 
Ao レベ ル 。 ご の 数 に よっ つて * 
重ね あわ せる 文字 の 数 を : 
決め る ・ 
田 プ ロブ ラム ハム の 説明 
10 REM 文 


デー タ 読 み 込み る 120 行 へ も どる 
デー タ ( コ メン ト )  : 110 TIME 初 期 設定 と 表 : 170 完成 時 の BGM 
デモ 画面 作成 示 ・ 180 コメ ント を O 〇 <11 ま 
レベ ル 入 力 :・ 120 キー 入力 、BGM、 か ・ で し が ガ 用意 し て な い 
レベ ル 数 に 応じ て 文 ・ か つ だ 時 間 の 表示 ・ の で 、 そ れ を 越え る 
字 を SYMBOL 文 で : 130~-150 枠 の な ガ に まだ 文字 ・ レベ ル だ つ だ 場合 に 
重ね あわ せ 表 示 。 1 : が 残っ て いれ ば 160 行 : 備え て 、A の 値 を O 
文 ず つ を 多少 ゆ つ : へ 。 何 も な けれ ば 170 11 に 制限 

の 表示 し で ぐま 行 へ ・ 181190 レベ ル に あわ せ だ ただ コ 
うに W を 使っ た カラ ・ 160 押さ れ だ キー の 文字 ・ メン ト 表 示 

ルー プ を 利用 し て い ・ を 枠 の な ガ に 表示 し 、・ 200 りり 芝 レイ 久 連 


頭 の 健康 の た め レ ベル の 


編集 部 で 悪戦 苦闘 し た か ら ケ チ を つ 
ける わけ で は な いけ れ ど 、 レ ベル が 無 
制限 に ある の は どう か な と 思う 。 

SO0 と か 1 と が 、 こ は まる に 
コメ ント の と お り 、 人 間 技 で は で き な 
いと 思う 。 で も 、 レ ベル は 無制限 に あ 


る お あけ て 、 で こま て いっ て も 「 や っ た 
ぞ 、 お れ は この パズル を 征服 し た /」 
と いう 油 足 感 が 得 ら れ な い 。 と な る と 、 
な か に は 八 求 不満 と パズル の や りす ぎ 
で 頭 の 回 路 が フッ と びそ うに な る 人 が 
出 て くる か も 。 

ここ は や っ ぱり 、 人 間 に 可 能 な レベ 
CM ま にし で 失い だ は ほう が 、 いと 介 
う な 。 そ れ に 、 た だ た だ の 数 字 よ り も レベ 
ル に 名 前 を つけ て は どう だ ろう 。 を こ 
て 、 こ ん な ょ うに 制限 し て みた 。 
@ 初級 一 一 2 文字 の 重ね あわ せ 
@ 中 級 一 一 3 文字 の 重ね あわ せ 
@ 上 級 一 一 4 文字 の 重ね あわ せ 
@ ブロ ーーー 6 文字 の 重ね あわ せ 

こん な ふう に する の は か ん た だ ん 。 添 
削 後 リ スト の 20 行 と 90 行 で や っ て いる 


こと を 抜き 出し て みる と 、QL() に 難 
易 度 (文字 の 重ね あわ せ 数 )、QT$() 
に レベ ル の 名 称 を 読む こと に し て 、 
①DIM QL(4),QT$(4) 
(2)EOR 上 二 1 す 10 4 
③READ QL),QT$ ⑪) 
④NEXT 

( 丸 囲 み 数 字 は 仮 の 行 番号 

る MAC LC うつ 0L(4) に 、 2 8、 
4 、 6 が 読み 込ま れ 、QT$(1) 一 QT 
あん 49 に キュ ユウ チョ ュ ン キュ ツウ“ 
* ジ ョ ウキ ュ ウ パブロ” の レベ ル 名 が 読 
み 込 まれ る わけ だ (デー タ 文 が 必要 ) 。 
た だ し 、 流 削 後 リス ト で は 、 1 画面 に 
お さる さめ る た だ め に 配列 宣言 を 省略 し た 。 
も の くん な る と まし な い 
時 


Z 


膝 中 くん の プロ グラ ム で は 、 問 題 を 
90 行 で B=INT (RND(10) *222 十 32) 
と し て お いて 、100 行 の CHR $ (B) て 


次 々 に キャ ラク タ を 出す よう 
いる 。 

これ で は 、 最 初 に 設定 され た 問題 が 
火 々 に 肖 え て し まう わり で て 、 ギ フチ ッ 
プ し て 答え を 知 ろ うに も 、' 答 え は どこ 
SO2009028BIL の SO に の 

そ 和 に 、 こ れ で は CHR$ (32) か ら 
CHR $ (253) まで の 222 個 も の キャ ラ 
クタ を 使う こと に な っ て 、 ち ょ っ と 上 黄 
し すぎ る 原因 に も な っ て いる 。 ま た 、 
2 つの 同じ キャラ クタ が 問題 の な か に 
入り こん で し まう 可能 性 も ある の だ 。 
を そこ で 、 ま ず 、 英 数 字 十 記号 の モー 
ド と カタ カナ ・ モ ー ド に 分 け て みた 。 
プレイヤー は 、 ゲ ー ム の 最初 に どちら 
か の モー ド を 選択 し 、 1 回 の パズル で 
は その モー ド の キャ ラク タ し か 使わ れ 
時 46 2 
て お け ば 、 超 区 解 な グラ フィ ッ ク キ ャ 
0 と も な いし 
ね (も っ と も サド 趣味 の 人 は お 好き に 
と どうぞ )。 

英 数 字 十 記号 モー ド は 0 一 9:: く テッ > 
7 @A-Z[\ の 45 個 と し て これ を Q$ 
(0 ) に 格納 、 カ タカ ナ モ ー ド は アー ン 
の 45 個 で Q$ (1 ) に 格納 し て お こう 。 
を のだめ の プロ グラ ム は 次 の と お り 。 
①DIM Q$(1),Q(3) 


に な っ て 


ギブ アッ プ し レ た 人 に は 
韻 え を 教え て あげ た い 


②Q( 0 ) 48: Q(1) 
:Q(3)=221 
(⑱EOR.J 圭 0 TO 1 
〈④FOR 1=Q (J *2) TO Q(J *2 十 1) 
⑥⑤Q⑩$ 9) =Q$ JJ) 填 CHR $ (1) 
⑥NEXT 1,J 

これ CO (0) に は 美 数 字 上 記号 が 、 
Q$(1) に は カタ カナ が 、 それ ぞ れ 順 
序 上 正しく な らん が だ 文字 列 と し て 入っ て 
いる 。 

火 に 、 こ の 文字 列 の 並び カカ を バラ バ 
2 し ウッ の あの 6n ポッ メグ ク の シッ 
移 必 グル す る よう な 感 。 この ルー デー チ 
ン は 他 で も いろ いろ 使え る よ 。 
①FOR J テ 0 TO 1 
②FOR エ = テ 1 TO 100 
③R 1=INT (RND(1) *44) 十 1: R 2 

=ーINT (RND( 1) *44) 十 1 
〈④N $ = テニ MID$ (Q$ ( す ), R 1 ,1) 
⑤MID $ (Q $ け ), R1, 1) =MID $ (Q 

$ け J), R2, 1) 
⑥MID $ (Q⑳$ け ), R2, 1) ニ N$ 
⑦NEXT 1,J 

これ で 、 N$ を 一 時 待避 場所 に し て 
が シャ ガ シ ャ と EQ$(0),Q$(1) の 中 
身 が シャ ッ フ ル さ れ だ た こと に な る 。 

さて 、 間 題 作 り だ 。 問題 を 入れ て お 
〈 変数 も 、 ち ょ っ と まぎらわしい か な 
と も 思っ だ けど N$ に し て お いた 。 
と の 文字 数 (2、3、4、6) を 


ー92: Q(2 ) 三 177 


レッ ベル ご こ 


その 都度 


LEV と いう 変数 に 入れ いて 、 


LEV の 数 だ け 、 バ ラバ ラ に な っ だ Q$ 
(0).Q$(1) の 文字 列 か ら 抜き 出す こ 
と に し だ つまり 次 の よう に ず すま 
いい わけ だ 。M は モー ド で 0 が 英 数 字 、 
0 の 0 た に ( の 2 

N$ = テーMID$(Q$(M), (INT (RND 
( 1 )*44)*(45 一 LEV) ) \44 十 1LEV) 

の PU は 2 クッパ パラ に WAC だ 火 学 
列 か が ら ラ ンダ ム に レベ ル で 必要 な 文字 
を 選び 出し て くれ る わけ が だ 。 

肖 趣 を 画面 に 表示 する と き に は 、 こ 
の N $ か ら 1 字 ず つ 取 り 出 せ ば いい わ 
け だ し 、 ギ ブ ア ッ プ で 答え を 表示 する 
と きも この N $ を 使う こと が で きる っ 
て わけ 

ちな み に 、 ギ プア ッ プ ・ キ ー は [PFi ] 
に 設定 し て お いた 。 キー を 押す と 、 ザ 
ツネ ホン よ 出 て 、1 字 ずつ 表示 し て く 
れる の だ 。 こ の 処理 は 流 削 後 の リ スト 
80 行 で や っ て いる 。 


も と の ブロ グラ みて は 、 リ ラ レ イ す 
る と き に 、 い ちい ち 初 期 画面 に も どっ 
て し まっ て 、 の その を そ と 出 て くる デモ 
画面 を 何 度 も 見 な くち ゃ いけ な い 。 こ 
れ じ ゃ ちょ っ と 退屈 な の で 、 リ プレ イ 
時 の も と り 先 を 調節 し た いも の 。 

常に ディ スプ レイ され て いる 基本 画 


ざ 


面 を 作っ て お いて 、 リ プレ イ の た だ びに 
eo e の ポス だ し た に 。 

さき 和 な ら 、 リア レイ に し て も 。、 逢 が 
その まま 残っ て 、 そ の 下 で モー ド と レ 
ベル の 設定 が で きる わけ が だ 。 

まだ 、 コ メン ト が レベ ル に よっ て 変 
わる の は いい の だ けれ ど 、 は や く 完 成 


し て も お そく 〈 完 成 し て も 、 
同じ だ っ て いう の も マズ い 。 
や っ ぱり 、 か か っ た だ 時 間 に よ っ て コ 
メン ト や を 突 え る べき だ ね 。 
そこ で 、 も と の リス ト に あっ た コメ 
ント か ら 8 つ 抜き 出し て 、 時 間 に 応 じ 
だ ラメ ント に 交 ん え で みた 。 し か も 、 た だ 


コメ ント が 


と えば 初級 レベ ル で の 5 秒 と プロ レベ 
ル で の 5 秒 は 価値 が 違う わけ だ か ら 、 
を の 点 も 考え に 入れ た 。 

この 処理 は 60 行 と 70 行 の 変数 MN が 
員 C く る だ る の て 人 有る て そい 2。 る まみ 、 
MN は 、 完 成す る の に か か っ た だ 時間 を 
8 つの クラ ス に 分 ける だ め の 変 数 と い 
フ 007 で 5 

60 行 の MN=LEV*2 一 (T\(2 へ LE 
V) ) の 式 は 、 か か っ た 時 間 (T) を 2 の 


LEV 乗 て 割り 9、LEV の 2 倍 か ら 6 引く と 


いう も の だ けれ ど 、 こ れ に は ある い は 
異論 が 出る か も し れ な い 。 ま 、 好 み に 
よっ つ で 6 究 えて の て ちょ うだ い 。 

た だ 、 こ うし て お け ば 、 初 級 レ ベル 
て と どん な に 早 て 完成 した っ て ! カ ミホ 
ト ケ デ ス ! 」 な ん て 最上 級 の メッ セー 
ジ は 出 な いわ け で 、 か な り 感 覚 的 に は 
能 も い 制 導 に ひら て る 。 枯 う けり と ん 。 
120 り 2 0 の 


最短 時 間 記 録 を 入れ た ら 
1 画面 を 越え こ て し まっ つた / 


25 FORI=9TO7:HI(I)=9999:NEXT:GOSUB199 


65 IFT く HI (MxX4+L-1 )THENHI (MX4+L-1)=T:GOSUB119 


199 LH(9)=1:LH(1)=27:LOCATE 1.5:PRINT 
"iLOCATE 3,6:PRINT "ペスト タイ ム " ELOCATE 28.6:PRINT 
119 FORI=9TO3:FORJ=9TO1:LOCATELH(J) , IX2+18:PRINTUSING"& 
H(J) 、IX2+9:PRINTUSING" 提 提 井 寺 拓 SeC"iHI(I+JX4):NEXTJ,T:RETURN 


ホン ト は 添削 4 に し た か っ た けど 、 
どう し て も 1 画面 に 入ら な い の だ 。 こ 
れ で ひと 晩 、 頭 を 悩ま せ た け ど 、 つ い 
に ポア ッ ク 。 の マク と いう ざと た し 
の 60 

と いう わけ で 、 1 画面 の な か に は 入 
りき ら な いけ ど 、 最 短 時 間 記 録 を 各 モ 
ー ド 、 各 レベ ル で 残す た め の プ ログ ラ 


エイ スウ シャ モー トー "LOCATE 20、5:PRINT “カク > モード“ 
トド と 1 ム 


ム を 作っ て みた 。 

添削 後 の リ スト に 加え て 、 下 の リス 
ト を 打ち こん で ほしい 。 こ れ を 実行 す 
る と 、 基 本 画面 の 両側 に 、 ズ ラッ と 最 
短 時 間 記 録 が 表示 され る よう に し た 。 
で も , 最短 時 間 達 成 者 へ の メッ セー 
ジ は な い の で 、 は ほし い 人 は 適当 に つけ 
加え て みよ う 。 


&" iQT も (T+1):LOCATEL 


その ほか 、 添 前 担当 で ぶ 先 生 の …… ご 2S3 記 


プロ グラ ハム の 説明 は 、 本 文 を 読ん で 
も ら う こと と し て 、 い い 大 し だ こと を 
し SS つ ガ 。 

太 時 間 の 表示 の 部 分 、 ち よ つ と アル ゴ 
「 リ リズ ハ を 変え て みた だ 。 も と の プロ グラ 
ム へ で は キー 入力 ガ びあ つて 正解 ひご うか が 
を 判断 し て か ら 時 間 を 表示 し て いる け 
れ ど 、 ご これ だ と 人 間 の 考え て いる 時 間 
避 吉 也 て 。 コン ピュ コ ュー タ の 考え で いる 
時 間 ま で が 所 用 時 間 に 入 つて し まう つう 。 
そこ ご で 、 キ ー 入 力 の 直後 に 、 

T お = TIME お 


と し て お いて 、 正 解 ひ ご どう か が の 判断 
が 終わ つて か がら 、 
TIME お = T や 

ご いつ クル 当り の に し た 。 
央 の くる モー に に に 多 け だ の だ 才 ら 、 
関係 な い キ ー は 受け つけ だ こない 。 そ 
で キー 導 及 が あつ だ た だら 、 人 人力 キ ャ ラ 
クタ の 制限 内 ひど うか ガチ エッ ツク し て 、 
制限 外 な ら 受 けつ け な い よう に 変え て 
あい だ 。 
廊 添削 後 | リス ト の 10 行 目 。CLEAR300 
と し を の は 、 ど ん な プロ グラ ハム で も 必 


ざ ず ク リア を 付け る べき だ / と いう 信 
菅 の だ め 。DEFINT A-Z は 、 実行 束 
度 を 速く ご する だ めで これ も 当然 。D ヒ F 
FNR=RNDC41.) * 44 は 、 し よ つ ち ゆう 
合う この 式 を 、 コ コー ジー シィ ァ ン 2 と 
に 定義 し て いる の だ けれ ど 、 ご これ も 常識 。 
それ か ら 、 乱 数 系 列 の 指定 は 、! リ スト 
の よう に RANDOMIZE TIME で 十分 。 
廊 20 行 目 、 配 列 を 宣言 し こない けれ ど 、 
どう し て も / と いう 場合 は 宣言 し な 
ぐ て も いい 。 ご の 場合 は 、 リ スズ スト を W 
IDTH80 の 画面 に お さめ る だ め 、 ど う 


ク 


し て も / の 場合 だ つた の だ 。 
雪 30 行 目 の WHILE を 使 つ だ 部 分 。 ご 
の よう に する と 、|F 文 で 2 行か か る ご 
と が 1 行 で で きる の だ 。 WHILE 一 W 
END を 活用 し よう / 
太 と いう と ころ で 、 主 お 変数 リス ト を 
災 で 説明 し て お こう 。 
AS(O) 一 AS(9) …… コ メン ト 、AS 
'(9) は ギブ アッ プ の と き 
CO(6) 一 (0 つ ( 3) や 竹 モ ー ド に お ける 
- キャ ヤラ クマ コー ド の 制 眼 値 。 た と え 
ば 、 〇 (O 〇 ) 一 O( 4 ) の あい だ に 英 数 


字 十 記号 モー ド の アス キー コー ド の 
値 び 入 つ て いる わけ だ 
OL( 1 ) OL( 4) …… 各 レベ ル に 対 
応 し だ 問題 の 重ね あわ せ 回 数 
OT$( 1 ) OTS( 4)…… 各 レベ ル に 
対応 し だ た 名称 
OS( O). OS( 1 ) …… 各 モー ド で 使う 
文字 列 が 入る 。 〇 は 英 数 字 十 記 号 、 
1 は カタ カナ の モー ド 
E$…… ゲ ー ム オー バー 時 の サウ ンド 
デー タ 
N$……OS( 〇 ) . OS( 1 ) の 中 身 を シ 


ヤッ ツノ ル す る と きこ と 、 問 題 の 答え 格 
納 用 に 使 つ て いる 


_P$…… ゲ ー ム 中 の ラン ダム ノー ト 


中 お や ダイ トル 格納 。 ゲ ー ム が スマ 
ー ト する と 、 ダ イハ の 一 時 記 帖 用 に 
使用 し て いる 

SSD の 9 タイ ハム の 初期 値 

MS(O), MS$( 1 ) …… 人 千 モ ー ド の 名 秋 

MS ゲー ム 中 の モー ド 

に WSese ゲー ム 中 の レベ ル ( 問題 の 重 
ね あわ せ 回 数 な ど に 使用 ) 

IMN…" 表示 すべ き コ メン ト の 番号 


19 CLEAR399:DEFINTA-Z:DEFFNR=RND( 1 ) x44:COLOR7 :WIDTH49,25:RANDOMIZET IME 

<9 FORI=9T09:READA$(T ):NEXT:FORI=1T04:READQ( 1 -1) 、QL( 1 ) ,QT$ も (1) :NEXT :FORJ=9TO1 :FOR 
1=Q(Jx2)TOQ(JX2+1 ) :Q$(J) =Q$(J)+CHR$( 1 ) :NEXTT ,J: READE$,P$,T$,S$:FORI=9TO1 : READM$( 
1):SYMBOL(61-1,2-]) 、T$,6.5,5+1:NEXT:LINE(13.5)-(25,17) ,""、5.B:ONKEY( 1)GOSUB89 
39 KEY(1)0FF:M=-1: し =-1:WHILEM く 90RM>1 : LOCATE5 , 29 : PRINT " ト ^ ッ チノ モー ト ~ テ *~ ヤル (9-1)7":M=V 
AL(INPUT$(1)):WEND:PRINTTAB(16) :M$ も (M) :WHILEL く 10RL>4 :LOCATE6 , 22:PRINT "トト ノ レベ トルテ ~ 
ヤル (1-4)2 9: し =VAL(TNPUT$ も (1) ) :WEND:PRINTTAB( 16 ) :QT$(L) :LEV=QL(L) :LOCATE13,19 

49 FORI=1TO199:R=FNR+1:S=FNR+ 1 : N$=MID$(Q$(M) ,R, 1 ) :MID$(Q$(M) 、R, 1) =MID$(Q$(M) ,S, 1 
):MIDS(QS(M) .S, 1 ) =N$:NEXT :N$=MID$(Q$(M) ,(FNRx(45-LEV) )\44+1 ,LEV) : FORI =1TOLEV: SYM 
BOL(239,55 ) ,MID$(N$ 1 ,1),29.19,.4,,XOR:NEXT :KEY(1)0N:TIME$=S$:PRINT "TIME=":P=- 1 
59 WHILEP く 9:T$=" "EEWHILEASC(T$) く Q(Mx2)0RASC( 1$) >Q(Mx2+1 ) :LOCATE18,19:PRINTTIME$: 
R1l=FNR+19:PLAYP$: 1T$=INKEY$+" ":WEND:T$=TIME$: SYMBOL(239 , 55 ) , 1$,29,19,4,,XOR:P=9: 
FORX=240TO389STEP29:FORY=69TO139STEP19:P=P+POINT(X,Y) :NEXTY,X:TIME$=T$: WEND 

69 LOCATE18.19:PRINTT$:PLAYE$:T=VAL(LEFT$(T$, 2 ) )x3699+VAL(MID$(T$,4,2) )x69+VAL(R 
1GHT$(T$,2) ) :MN=LEVX2-(T\(2^LEV) ) : IFMN く 9THENMN=9ELSEIFMN >8THENMN=8 

79 LINE(9,169)-(639,199) ,PSET , 9 ,BF: SYMBOL(183,179) ,A$(MN) , 4,2。5:SYMBOL(182,169) , 
A$(MN) ,4.2.7:LOCATE13,24:PRINT "モウ イチ ト ~ ヤル (Y/ZN)9" ji:T$=" の "EiWHILE1$ く >"N"ANDI$ く >"Y" : 1 る 
=INKEYS:WEND: IFI$="Y"THENLINE(9,169 )-(639,199) ,PSET , 9 , BF : GOT039ELSEEND 

899 KEY(1)OFF:PLAYE$:LINE(244,48)-(395,135) , PSET , 9 , BF:FORI=1TOLEV:FORJ=9TO1 : SYMBO 
L(239,55 ) ,MID$S(N$ 。T,1) 29,19,4,,XOR:FORM=9T0999 : NEXTM, J , TI :MN=9 :RETURN76 

99 DATA オチ ャ ノコ サイ サイ 。 マ アマ ア タ ^ ネ 。 ス コト イ ! 1 。 ス コイ テ ~ スネ ー 。 シュ ウサ イ タタ ~ | 。 テ ン サ イ タ ~ 1 。 ヘ ペン タイ タ * ナ ? 。 キ チカ ~ イ 
- カ モネ! 。 カ ミホ ト ケ デース! 。 サ トン ネン ! 。48 2 。 シ ョ キュ ウ , 92 , 3 , チ ュ ウ キュ ウ , 177 、 4 ショ ウキ ュ ウ , 221 .6, フ ブロ,S8T159L150 
SCDEFCDEFCCCRFGBAFGBAFFF , "T255L15N=R1 "テコ スル 7 スル, " 99: 99:99" , エ イス ウシ ヾ , カタ カナ 


他 機 種 に は FM-7 の よう な SYMBO 
L 文 が な が い の で 、 その か わり に 「 全 移 
植 機種 用 追加 プロ グラ ム 」 を 加え て ほ 
し い 。 こ の た め 、 1 画面 に は な ら な い 
けれ ど 、 か ん べ ん し て よ 。 で も 、PC- 
8001 版 と X-1 版 は 、 メ イン プロ グラ ム 
部 分 だ け は 1 画面 に 入っ て いる の だ / ノ 

た だ し 、 英 数 字 十 記号 モー ド の み に 
し た (だ っ て 面倒 くさ いん だ も ん )。 


REM Character pattern data (chr$(&h39 ) to chr$ も (&h5c) ) 
RESTORE 2949:1I=9 

READ D$: IF D$ ゃ = "END" THEN RETURN 

POKE ADD+ IT ,VAL("&H"+TD$ も ):T=T+1:GOTO 2929 

DATA 3C,42.62.5A,.46.42.3C,99.19.18,.14.19,19,19,7C,99 
DATA 3C,42.49.39.9C,92.7E,99.3C,42.49.38,49,.42.3C,99 
DATA 29.39.28.24.7E,29.29.99,7E,92.1E,29.49,22.1C,99 
DATA 38.94.92.3E,42.42.3C。99,7E, 42.29,19.98.98.098,099 
DATA 3C,42.42.3C,42.42.3C,99, 3C,42.42.7C,49.29,1C,99 
DATA 99.99.19.99.99,19.99.99,99.99,19.99.99,19,.19,098 
DATA 79,18,9C,96.9C,18.79,99.99,99.7E,99,7E,99,.99,99 
DATA 9E,18.39.69.39,18.9E,99,3C,42.49.39.98,99,98,.099 
DATA 38.44.52.6A,.32.94.78,.99 

DATA 18.24.42.7E,、42.42.42.99.3E,44.44.3C,44,44.3E,99 
DATA 38.44.92.92.92.44.38.99。1E,24.44.44.44.24.1E,99 
DATA 7F,91 91.3F,91 91.7F,99,7F,91 91.3F,91 ,91,.91.99 
DATA 38.44.92.72.42.44.38.99,42.42.42.7E,42.42.42.99 
DATA 38.19.19.19.19.19.38.99,79.29,29.29.29.22,.1C,99 
DATA 42.22.12.9E、12.22.42.99,92.92.92.92.92.92.7E,99 
DATA 42.66.5A,5A,42.42.42.99,42.46,4A,.52.62,.42.42,.099 
DATA 18.24.42.42.42.24.18.99.3E,42.42.3E,92.92.92.。099 
DATA 18.24.42.42.52.24.58.99.3E,42.42.3E,12.22.42.99 
DATA 3C,42.92.3C。49。42.3C,99.7C,19.19,19,19,19.19,99 
DATA 42.42.42.42.42.42.3C。99, 42.42.42.24.24.18,18,.99 
DATA 42.42.42.5A,5A.66.42.99、42.42.24.18.24.42.42.09 
DATA 44.44.44.38.19,19,19,99,7E,49,29,18.94.92,.7E,99 
DATA 3C,94.94.94.94.94.3C,99,、44.44.28.7C,19,7C,19,099 
DATA END 


PC-8007,mk/77/8807,mk/7 
(M- BAS/C) 
英 数 字 十 記号 モー ド の み と い う 点 以 
外 ほ ほとん だ 同じ 。 た だ 、 ギ キャラクタ 
の 形 が よく わか ら な いと いう 人 の た め 
に [|f・5 | キー に 全 キ ャ ラク タ ・ デ モ 機 
能 を 入れ た 。 レ ベル 入力 し て か ら ゲ ー 


ム オ ー バ ー ま で の あい だ な ら 、 い つ で 
も この キー を 押す と 、 全 キャ ラク タ を 
1 つ ず つ デ モン スト レー ショ ン し て く < く 
れる の 0 だ キア アッ ク は ff-\ 

プロ グラ ム 的 に は これ と いっ た 技 を 
使っ て いな い 。SYMBOL 文 を マシ ン 
語 (USR) に し た くら い 。A テ USR(AS 
CC 0”)) と や る と A に 枠 の な か の 田 の 
個数 が 入る の で 、 こ れ を 使っ て 終了 か 
どう か の 判断 を し て いる 。 ち な み に 、 
USR 1 は 小文字 か ら 大 文字 に 変換 し て 
くれ る サブ ルー チン 。 

これ で CAPS LOCK | を 不要 に し た 。 


PC-6007nk77/6607 
( 導 。M6OBAS/C) 


移植 に 最も 苦痛 し た 。 や っ ぱり 下位 
機種 へ の 移植 は 導 れ る 。 ギ ブ ア ッ プ は 
| RETURN キ ー。 タイ ム の 表示 は 秘 数 に 


し た 。 [CAPS LOCK は 不要 。 


X』(C, D) 


2 が プ 08 こ SL し また 、 じ る ルル 和信 
玉 の と どき に 、.0 を 入れ る と 人 光 キ ャ ラン 
タ の デモ が 見 られ る 。 

あの デー クタ が すず すっごく 長い の は 、 
ゲー ム 中 の ラン ダム ノー ト を 出す た め 
に PLAY 文中 で 変数 が 使え な いせ い 。 


| CAPS LOCK 尋 。 


ル 7 ら X 


(VDP ア クセ ス は ちゃ ん と BIOS を 使 
っ て まっ せ 、ASCII ち ゃ ん ! ) 

ギブ アッ プ は | RETURN キ 一 。 全 キャ 
ラク タ の デモ は レベ ル 入 力 時 に 0 を 入 
力 す れ ば いい 。USR 1 は キー 入力 バッ 


ファ の クリ ア 用 。 [CAPS LOCK 苦 。 


19 CLEAR399 , &HCFFF: DEFINTA-Z:DEFFNR=RND( 1 ) x44 :GOSUB99 : ADD=&HD959 :GOSUB2999:WIDTH 
49 ,25:CONSOLE, , 9 , 1 :COLOR7 ,9.9:PRINTCHR$( 12) : RESTORE199:FORI=9T09:READA$( 1 ):NEXT: 
FORI=1TO4 :READQL( 1 ) ,QT$(T):NEXT:FORI=48T092:Q$=Q$+CHR$S( 1]) :NEXT 

29 DEFUSR= &HD999 : DEFUSR1 =&HD946 :LOCATE14,2:PRINT "テコ ズル ズル "ELINE(14,6)-(25,17 
) " 較 ",5、B:LINE(15,7)-(24.16)、" "4.BF:LOCATE13,19:PRINT "TIME=" 

39 LINE(9,29)-(39,24),"",7。BF:LOCATE8 ,29:PRINT" ト ~ ノ し へ ^ ル テ ~ ヤル (1-4)27 8: し =VAL(INPUT 
$(1) ):IFL く 10RL>4THEN39ELSEPRINTQT$(L) :LEV=QL(L ) 

49 FORI=1TO199:R=FNR+1 :S=FNR+ 1 : N$=MID$(Q$,R,1) :MID$(Q$,R,1)=MID$(Q$,S,1):MID$(Q$ 
.S, 1 ) =N$ : NEXT : N$=MID$(Q$ (FNRx( 45-LEV ) )\44+1 LEV) :FORI =1TOLEV:A=USR(ASC(MID$(N$, 
1 ,1) ) ) : FORJ=9T049:NEXTJ,1:TIME$="99:99:99" 

59 T$=TIME$:LOCATE18,19:PRINTT$ も :I=INP(9):IFI<>255THEN79ELSE1 =USR1(ASC(INKEY$+" 「 
) ) : IFI<480RI >92THEN59ELSEA=USR( ! ) : IFA>9THEN59ELSEGOSUB89 :T=VAL(LEFT$(T$, 2 ) ) x3699 
+VAL(MID$(T$,4.2) )x69+VAL(RIGHT$(T$,2 ) ) :MN=LEVw2-(T\(2^LEV) ) : IFMN >8THENMN=8 

69 MN=(MN<9 ) xMN+MN: LOCATE13.22:PRINTA$(MN) :LOCATE13,24:PRINT "モウ イチ ト ~ ヤル (YZN)2 リ 5:1 
$=INPUT$(1):IFI$="Y"ORI$="y"THEN39ELSEEND 

7 LINE(16,8)-(23.15),"",4,BF: IF1=253THENGOSUB89:FORI=1TOLEV: FORJ=9TO1:A=USR(ASC 
(MID$(N$, 1 ,1) ) ) : FORM=9T0999 : NEXTM,J, ! :MN=9:GOTO069ELSEFORI=48T092:FORJ=9TO1:A=USR 
(1! ) :FORM=9T0499:NEXTM,J。T:GOTO39 

89 FORI=55TO1STEP- 1 : BEEP1 : FORJ=9TOI : NEXT : BEEP9 : NEXT : RETURN 

99 READD$:FOR1=9TO75:POKE&HD999+ 1 ,VAL("&H"+MID$(D$,T*2+1.2) ) :NEXT:RETURN:DATA ES 
DD2E997ED639219999444F992929299159D99911E2F6DD26987E96989F9E9939929E87F51AA92892 
DD2C12F1131319EC23E521689919EBE1DD2529DDE1DD7D772336992BC97ECDC15F77C9 

199 DATA オチ ャ ノコ サイ サイ , マ アマ ア タ ~ ネ , ス コト イ ! 1 、 ス コ ~ イ テ ~ スネ ー 。 シ ュ ウ サイ タ ~ |! 。 テ ン サ イ タ ~ 1 。 ヘ ペン タイ タナ 9 。 キ チカ イ 
カモ ネ ! , カ ミホ ト サ テ ^ ス ! , サ トン ネン ! 。2 ショ キュ ウ , 3 , チュ ウキ ュ ウ , 4 。 シヨ ウキ ラウ, 6 プロ 


19 CLEAR399 , &HDFFF : DEFFNR(D)=INT(RND( 1 )x44):DEFFNT(D)=INT(TIME/1924 ) 
29 GOSUB1999:ADD=&HE969 : GOSUB2999 : SYM=&HE999 : し 2U=&HE945:PA=&HE944 

39 MG=&HE209:SCREEN2 、 1 , 1 :CONSOLE , 、9:CLS 

49 RESTORE599 :FORI=9T09: READA$(』) :NEXT:FORI=1T04:READQL( 【 ) ,QT$( 1) :NEXT 
45 READE$ 

59 FORI=9T044:POKEMG+ 1 ,1+48:NEXT:LINE(95,24)-(169,136) ,6,B 
69 LOCATE19,9:PRINT "テコ ス ^ ル ハス ズール":LOCATE11.12:PRINT "TIME=" 
79 LINE(9,169)-(256.192),9,BF:LOCATE5,13:PRINT" ト に ノ レベ ~ ル テ ~ 
89 I$=INKEY$:IFI$ く "1"0RI も >"4"THEN89 

99 L=VAL(1$):PRINTQT も (し L) :LEV=QL(L ) 

199 FORI=1TO199:R=FNR(9)+1:S=FNR(9)+1:N=PEEK(MG+R ) 

119 POKEMG+R . PEEK(MG+S ) : POKEMG+S , N : NEXT 

129 N=INT((FNR(9)\(45-LEV) ) /44 ) 

139 FORI=1TOLEV: POKEPA , PEEK (MG+N+ 1 ) : EXECSYM:FORJ=9T049:NEXTJ, 1 

149 FORI=9TO03:POKE&HFA28+I,.9:NEXT 

159 T=FNT(9):LOCATE16.12:PRINTT:1$=INKEY$+" "ETIFASC( 1 も )=13THEN399 
169 POKEPA,ASC( 1$) :EXECL2U: IT=PEEK(PA) : 1F1 く 480RI >92THEN159 

179 POKEPA, 1 :EXECSYM: IFPEEK(PA ) >9THEN159 

189 PLAYE$:MN=INT(LEVX2-(T/(2^LEV) ) ) : IFMN >8THENMN=8 

199 MN=(MN<9 ) xMN+MN:LOCATE11.14:PRINTA$(MN) :LOCATE11.15 

299 PRINT "モウ イチ ト ~ ヤル M(Y/N) 2 95 

219 I$=INKEY$:IFI$=" "THEN216 

229 IFI$="Y"ORI$="y"THEN79 

239 END 

399 PLAYE$:LINE(96,32)-(152,128) ,9,BF:FORI=1TOLEV:FORJ=9TO1 

319 POKEPA ,PEEK(MG+N+ 1 ) : EXECSYM:FORM=9T0499:NEXTM,J,1:MN=9:GOTO199 
599 DATA オチ ャ ノコ サイ サイ 。 マ ア マ ア ター ネ 。 ス コ ~ イ ! 1 。 ス コ ~ イ テ ~ スネ ー 。 シュウ サイ タ ~ 1 。 テ ン サ イ タダ “ ! 
519 DATA ヘン タイ タ ~ ナ 9? 。 キ チカ ~ イ カモ ネ ! 。 カ ミホ トリ テ ~ ス ! , サ ー ン ネン ! 

529 DATA 2, シ ョ キュ ウ , 3 , チ ュ ウ キュ ウ 。 4 , シ ヨウ キュ ウ ,6 ブフ "ロロ 

539 DATA S8T159L1505CDEFCDEFCCCRFGBAFGBAFFF 

1999 RESTORE 1949 

1919 FOR I=@ TO 86:READ D$:POKE &HE999+I,VAL("&H"+D$) : NEXT 

1929 RETURN 

1949 DATA 21.44,E9,E5,DD,2E,99,7E,D6 ,39 21 .99.99,44.4F,99,29 

1959 DATA 29,.29.91.69.E9,99,11.6C,C2,DD,26.98,7E,96.98,.9F 

1969 DATA 9E.99,39,.92,.9E,3F,F5,1A,A9,28.92.DD,2C。12.F1,.13 

1979 DATA 19,ED,23,E5,.21.18.99,19,EB,E1 ,DD,25,29,DE,E1.DD 

1989 DATA 7D,77.C9,FF 

1999 DATA 3A,44.E9,FE,61.38,96,FE,7B、39 ,92.D6 ,29,32.44.E9,C9 


ャ LM(1-4)795 


19 CLEAR&HCFFF:DEFINTA-Z:DEFFNR=RND( 1 ) *44:ADD=&HD199:GOSUB2999:WIDTH49:CONSOLEB , 
25 .9 ,.39:COLOR7 , 9 :CGEN9 : CFLASH9 : CLS : RESTORE99 : A=&HD999 : READD$:FORI=9TO09 : READA$( 1 ) 
: NEXT:FORI=1T04:READQL( 1 ) ,.QT$(T):NEXT:FORI=48TO92 : Q⑤=Q$+CHR$( 1 ) :NEXT : READE$ 、P$ 
29 FOR1=9TO86 :GOSUB199 : NEXT :DEFUSR=&HD9@99 :LOCATE1 4 ,2:PRINT "テコ スール スル" ECOLOR5 : 
LINE(14.6)-(25.17) ," 園 "、B:COLOR7 :LOCATE13.19:PRINT "TIME=":ONKEYGOSUB79 :KEYOFF 

39 LINE(9,29)-(39.24)," ",BF:LOCATE8,29:PRINT "トー ノ レベル テー ヤル (1-4)971 2 し =ー1 : WHILEL く 
90RL>4 :L=VAL( INPUT$( 1) ) : WEND: IFL=9THEN89ELSEPRINTQT$(L) :LEV=QL(L):FORI=1TO1099:R= 
FNR+ 1 : S=FNR+ 1 : N$=MID$(Q$,R, 1 ) :MID$S(Q$,R,1)=MID$(Q$.S,1) :MID$ も (Q$ ,S, 1) =N$: NEXT 

49 N$=MID$(Q$,(FNRx(45-LEV) )\44+ 1 .LEV) :FORI=1TOLEV: A=USR( ASC(MID$(N$, 1 ) ) ) :FORJ 
=9T0499:NEXTJ,I:TIME$="99:99:99":TIME=9:TEMP02999:A=1:KEYON: WHILEA>9:1=9:WHILEI く 
480RI >92:T=ASC(INKEY$+" "):PLAYMID$(P$、FNRx3+ 1 、3) :T$=TIME$: LOCATE18.19:PRINTT$ 
59 WEND:T=TIME:A=USR( ! ) :WEND:MN=LEVx2-(T\2^LEV) : TEMPO559 :PLAYE$: IFMN>8THENMN=8 
69 MN=(MN<9 ) xMN+MN : LOCATE13.22:PRINTA$(MN) :LOCATE13,24:PRINT "モウ イチ ト ~ ヤ M(Y/N)?7 5 1 
$=INPUT や S(1):IFI$="Y"ORI$="y"THEN39ELSEKEYOFF : END 

79 KEYOFF :TEMPO559: PLAYE$:LINE(16,8)-(23.15)," ",4.BF:FORI=1TOLEV:FORJ=9TO1:A=US 
R(ASC(MID$(N$, 1 , 1) ) ) :FORM=9T0999 :NEXTM,J, 1I:MN=9: RETURN69 

89 KEYOFF:FORI=48T092:FORJ=9TO1:A=USR( IT ):FORM=9T0499:NEXTM,J、。1:GOTO39 

99 DATA E5DD2E997ED639219999444F992929299199D199915931DD26987E16989F1E9939921E67 
F5ED78D629AB2892DD2CC629ED79C578D619473E44ED79C1F1931529DC23E521299999444DE1DD25 
29CCE1DD7D772336992BC9 , オチ ャ ノコ サイ サイ , マ ア マ ア ター ネ 。 ス コー イ ! 1 。 ス コ ~ イ テ ~ スネ ー , シュ ウサ イ タ ~ 1 。 テ ン サ イ タ ~! 
199 POKEA+ 1 、VAL("&H"+MID や (D や IX2+1 ,2) ) : RETURN: DATA ペン タイ タ ~ ナ ? 。 キ チカ ~ イ カモ ネ ! 、 カ ミホ ト ケ デ ~ 
ス ! 。 サ トン ネン ! 。2 、 シ ョ キュ ウ , 3 , チュ ウキ ュ ウ 。 4 ,。 シ ~ ョ ウキ ュ ウ , 6 ,. フ "ロロ 。O05CDEFCDEFCCCRFGBAFGBAFFF 

119 DATA 01AO1BO1CO1DO01EO1FO01GO2A02B02C02DO02EO2FO2GO3A03B03C03D03EO03F03G04A04B04 
CO04D04EO04F04GO5A05BO5CO5DO5EO5FO5GO6A06BO6CO6DO6EO06F06GO7A07BO7CO07DO07EO07FO07G 


19 CLEAR399 ,&HDFFF:DEFINTA-Z:DEFFNR=RND( 1 ) x44:DEFFNT=INT(TIME/69 ) : GOSUB99 : ADD=&H 
F199:GOSUB2999:SCREEN9 :WIDTH49:COLOR15,.9:CLS:RESTORE199:FORI=9TO9:READA$( 1):NEXT 
:FORI=1T04:READQL( 1 ) ,QT も (TI):NEXT:FORI=48TO92 :Q⑤ も =Q$+CHR$( T) :NEXT :C$ も =CHR も (255 ) 


29 READE$,P$:KEYOFF :DEFUSR=&HF999:DEFUSR1=&H156:LOCATE14.2.9:PRINT" テ コス ズー ル "スール" 
・GOSUB299:J=TIME\199:FORI=9TOJ:A=RND(1):NEXT:LOCATE13.19:PRINT "TIME=" 
39 FORI=29T024:LOCATE9 ,1:PRINTSPACE$( 39)j:NEXT:LOCATE8 , 29:PRINT" ト に ノ レ へ ベル テ ^ ヤル (1 - 


4)273: し =USR1(9):L=VAL( INPUT$ も (1 ) ) : IFL く 90RL>4THEN39ELSEIFL=9THEN89ELSEPRINTQT$ も (し) : 
LEV=QL(L) 

49 FORI=1TO199:R=FNR+1:S=FNR+ 1 : N$=MID$(Q$,R, 1 ) :MIDS(QB、R, 1 )=MID$ も (Q$ も ,S, 1 ) :MID も (Q$ 
,S。 1 ) =N$: NEXT :N$ も =MID$(Q$ , (FNRx(45-LEV) )\44+1 ,LEV) :FORI=1TOLEV:A=USR(ASC(MID$(N$ 。 
1 1) ) ) :FORJ=9TO199:NEXTJ,。I:TIME=9 

59 T=FNT:R=FNR+19:PLAYP$:LOCATE18 19:PRINTUSING" 拉 提 音 仁 " 35T:T=ASC(INKEY も +" の):IFI=1 
3THEN79ELSEIFI く 480R1 >92THEN59ELSEIFUSR( 1 ) >9THEN59ELSEPLAYE$:MN=LEVx2-(T\(2^LEV) ) 
:・IFMN>8THENMN=8 

69 MN=(MN<9 ) xMN+MN: LOCATE13.22:PRINTA$(MN) :LOCATE13.24:PRINT "モウ イチ ト ~ 
=USR1(9):I$=INPUT も (1):IFI$="Y"ORI$ も ="y"THEN39ELSEEND 

79 PLAYE$:GOSUB299:FORI=1TOLEV:FORJ=9TO1 :A=USR( ASC(MID$(N$, 。1) ) ) :FORM=9TO999:NE 
XTM,。J,1:MN=9:GOTO69 

89 GOSUB299:FORI=48TO92:FORJ=9TO1:A=USR( 1 ) :FORM=9TO0499:NEXTM,J。 1 :GOTO39 

99 RESTORE99:READD$:FORI=9TO79:POKE&HF999+ 1 ,VAL("&H"+MID も (D$、 TX2+1.2) ) :NEXT:RETU 
RN:DATA 21F8F7E5DD2E997ED639219999444F992929299199F199EB215991DD26981A96989F9E99 
39929EDFFSCD4A99D629A92892DD2CC629CD4D99F12319E513D511299919D1DD2529D7E1DD7D7723 
36992BC9 

199 DATA オチ ャ ノコ サイ サイ 。 マ アマ ア ター ネ 。 ス コー イ ! ! 。 ス コ ~ イ テ ~ ス ネー 。 シュ ウサ イ タ ~ 1 。 テ ン サ イ タ ~ 1! 。 ヘ ンタ イ タナ 9 。 キ チカ "nx 
カモ ネ ! 。 カ ミホ ト ケ テー ス ! 。 サ トン ネン ! 。2 。 シ ョ キュ ウ 。 3 , チュウ キュ ウ 。 4 。 シ ~ ョ ウキ ュ ウ 。 6 , フ * ロ ,T159 し 1605CDEFCDEFCCCRFo 
BAFGBAFFF , "T255L64N=Ri“" 

299 LOCATE14.6:PRINTSTRING$( 12.C$):FORI=7TO16:LOCATE1 4 1:PRINTC$+SPACE$( 19 )+C も :N 

EXT:LOCATE14.17:PRINTSTRTING$( 1 2 .C$) : RETURN 


ヤル (Y/ZN)2 リ "5: 1 


い 
nm 


い 
WW 


見 かけ は シン プル で も 操作 
は フフ ザ ツ ……。 


も うけ に な る 。 

で も EAT 8001 の 操 
作 が メチ ャ ンコ 難し い 。 
使う キー は だ た っ た の 2 
6 う 。、 テン キー の ト の | 

ここ は 旭 だ 、 と 思っ て ほし い 。 キ ミ (PC-8801 は [) は 、E 
は 鉱石 収集 ロボ ッ ト EAT8001( キ ) で AT が 右 に 動い て いれ 
時 間 内 に 鉱石 ( ロ ) を 10 個 集め る の が 仕 ば 下方 向 に 、 左 に 動い 
事 だ 。10 個 集め る た びに 仕事 場 は 変わ て いれ ば 上 方 向 に 動か 
り 、 制 限 時 間 は 短く な っ て くる ん だ け すず ーー。 も うい ひび と つの 
ど 、 な あ に 誰 で も で きる カン タン な 仕 スペ ー ス ・ キ ー は EAT を 反対 方 向 に 動 や っ て みれ ば わか り ま す 。 


事 。 だ だ し 、 恵 シタ ダ (mw) や まわ ちり か す キ ー。 フ ム ム 、 言 葉 で 説明 する と 駐 参考 「 マ イコ ン BASIC マ が ガ ジン 」 
の 壁 に あ だ た だっ た ら ゲ ー ム オー バー に な わけ が わか らら ない だ ろう けど …… 二 > ?84 ・7 、『ALIEN 退治 』 
ロ 


る よ 。 リ プレ イ は |S| キ ー。 
鉱石 を 1 個 取 る ご と に 10 リ ル (/ 星 の 
貨幣 単位 )、 も ぐら (0O) は 1 匹 50 リ ル の 


1 WIDTH49 ,25:CONSOLE9 , 25,9 , 1:DEFINTA-Z 
2 M=1:COLOR5 

3 X=19:Y=9:V=19:W=9:A=10:T=559-Mx59 

4 PRINTCHR$(12) :LOCATE15.9:PRINT"TIME" 
8 LINE(9,1)-(38,24) ," 還 " .3,B:L=1:K=M+ 1 
3 
7 
8 


_ ダ じ な | 

| き 5 も 「 比 て て | Bs15:FORI=1TOB:GOSUB16:COLOR4:LOCATEC.D:PRINT"。":NEXT:FORI=1TOK:GOSUB16:COLOR 

| 1 か の べし | :LOCATEC,D:PRINT" 還 ":NEXT 

に る 出 か | 1=INP(8) : IFI=253THENW=Y+LELSEV=X+L 

ぼ も か ー と 会 い 1 Z$=INKEY$: IFZ$=" "THENL=Lx- 1 

| ん り + ー “ ム い P=PEEK(8HF392+Wx129+Vx2) 

| ょ は ひ ー $ 前 2 可 本 MS 9 MANEM66RRRM0M4838RNUNMRSSIERMMA 

7 て 拉 ・ ・ 0 Tu 

1 に じ ち 目 C て | 11 IFP=135THEN15ELSET=T-1 :LOCATE29,9:COLOR5 :PRINTUSI 

| ここ う > て | ロト NG" 村 "iT:TFT=9THEN 

| が ーー うこ ソン | 11THENBEEP1:BEEP9:S=S+59 0 

1 8 き ー ィ ェ ュ | USR NUM OM W 

『 だ り に ア い ッ | :B=T/2: 4,8:PRINT"BONUS ":B:S=S+B:LOCATE14,19:PRINT"SCORE=" 

(| よ な た :S:FORI=1T09099:NEXT :M=M+ 1 : 

| し か り | - と 」 15 EEE?OCATEIT8PRINT デ IGEOWER に IGRCI2URSDREeSMNIT4 8,255:RUN 

に _。 ン リ 16 C=RND(1)x37+1:D=RND(1)x22+2:RETURN 

一変 数 リス ト に ー 3 

M・… 面 数 < 時 。 ・ キー 操作 が 独特 で お も し ろ い 。 

XY……EAT の 座標 : 還 プ ログ ラム の 8 本 さき あの の と に 生 

EE お の 本 に 邊 委 に 5 ・ 12 も ぐら は ある か ? : 人 は 、3 行 の T の 数 値 を 大 きぐ 
還 生計 ・ 13 EA 「 表 示 ・ し て 時 間 を の ば す ガ 、6 行 の :F 

時 の o な 3 5 本 _ 14 面 ブ ノア 処 昌 ・ OR 1 TOK へ 以下 を 潜 去 

ee 理 シ ・ 箇 表 示 ・ 15 プー ム オ ー ル バー 処理 ・ し て 、 毒 シダ を 画面 に 表示 し な 

Rue 細 ら 2 の 9 の の 16 品数 ルー チン ・ い よう に し て みて ぐだ さい 。 

再 ・ 9-10 も ぐら 、 鉱 石 は ある が : 画 チ エッ ツ フ ボイン ト ・ 。 支 ヨ ッ シ ャ 買 。 


WW 


ゲー ム は 単純 な ほど お も し ろ い と い 
う 声 と 、 い ろ い ろ 楽 し い 仕掛 け の あっ 
だ ほう が お も し ろ い と いう 声 と 、2 通 
り の 意見 が ある けれ ど 、 こ の ゲー ム は 
前 者 の 代表 と いう と ころ 。 

余分 な 仕掛 け は いっ きい な し 。 登場 


する キャ ラク タ と いえ ば 、 写 真 で ご 覧 し て て くる が も 。 
の と お ぉ おり 、 た だ の ドッ ト 。 で も 、 こ 作者 に よれ ば 「20 一 
だ け で エキ サイ ティ ング ・ ゲ ー ム に な 30 回 6 や っ て いれ ば 、 


っ て いる ん だ か ら り っ ぱな も の 。 
ゲー ム が は じ ま る と 、 画 面 の 左上 か 


ら 有 下 へ 回 が っ て 点々 タタ me と 局 が ! 


落ち て くる 。 こ いつ を 、 テ ン キ ー の [2 


ー 
い 寺 


Ax 
ン 


WW 
V WNW 


[41618] を 使っ て 、 上 へ 移動 きせ た り 、 
左 へ 移動 きせ た り 、 ま た も と の 方 向 に 
も ど し だ た り し な が ら 、 画 面 の 外 べ へ 出 な 
いよ うだ ひだ すら キー ブ す 9 る の が ゲー 
ム の 目的 だ 。 

か な り の 集中 力 と 精 
神力 が 要求 され る 忍耐 
の ゲー ム だ か ら 、 和 気分 
の サッ ト し て な いと 
きる に 0 は 、 の ん る て 
夢中 に な っ て スッ キリ 


150 一 200 点 くら い は い 
あけ 朋 スン eeW 
最初 は と し て も で き な い 
よん て 思っ つて いて も 、 


閉 / リ 0g- つ ブ @ 


年 衝 枚 ほとん と ん うま く な っ つて ゆく 6 


の な の だ 。 ゲ ー ム オー バー に な っ て も 
スペ ー ス ・ キ ー で リプ レイ 。 何 度 で も 
チャ レン ジ し て みよ う 。 ちなみに 、 最 
高 点 は 念 の と ころ 446 点 だ を うだ よ 。 
廊 参考 「 マ イコ ン BASIC マ ガ ジ ン 」 
84・1、『 シ ョ ー ト プログラム の 組み 方 』 


H ュー らら CORE 


4 ご この 点々 を 自由 自在 に あや つつ て ぐれ / 


CMD SCREEN 2.9.6:CONSOLE9 .25 .0 1:DEFINTA-Z:WIDTH19 .20 :HS=106 


X=20:Y=13:CMD CLS 3:VX=1:S=9:VY=1 
COLOR2:LOCATE10.20:PRINT "Hi-SCORE" 
COLOR 7:LOCATE 19.9:PRINT "SCORE" 
I=INP(9):IFI=191THENVX=VX+2ELSE1FI=239THENVX=VX-3ELSEIFI=251THENVY=VY+2 
L=INP(1):IFL=254THENVY=VY-2 
IFX く <90RX>3290RY く 00RY >299THEN1 20 
【FHS く STHENHS=S 
COLORS:LOCATE29,9:PRINTUSING" 手 料 "S:COLOR3:LOCATE20 、18:PRINTUSTNG" 村 手持 " 
109 X=X+VXEY=YTVY:VX=VX+1:VY=VY+1 
119 (CMD PSET(X.Y).3:S=S+1:GOTO 59 
129 COLOR4:LOCATE13.9:PRINT"GAME OVER" 
139 R$=INKEY$:1FR$=" "THEN29ELSE139 


0 
5 つ 日 
| た アウ つ っ 
IN )、 / 
* 0 を プ フ 
0 作 ト 
DI 
も の な 遊 
カカ いん 
を で 
見 88 る 
』 せ を け 
| に 内 と 
や ね 自 
SN 
メア か 
の 
よ は 


nr の 某 4 下 mAS と は は テー く A き 
と n 眉 六 思 だ ヨー の の の 一 の で 問 持 ロ 


8 喜 > 対 は CWC の ー の ちの と 


一 変数 リス ト ・ ら …… ス コア ・ 100-110 TENTEN の 表示 : に は 、100 行 VX= ニ VX+0. 1: 
X……TENTEN の X 座 標 ”・ HS…… ハ イス コア ・ 120-130 ゲー ム オ ー バ ー ・ VY=VY+0. 1 と すれ ば よ ぐ 、 
Y……TENTEN の Y 座 標 "・ 弄 プ ロブ ラム の 説明 ・ 田 チ エッ フ ボ イン ト ・ その 他 、50、60 行 の VX、VY の 
VX-……X 座 標 の 物 動 用 ・ 10 一 40 初期 設定 ・ 。 この ゲー ム は 、 め ちゃ ん ご お : 増分 を 変化 させ る と お も し ろ い 。 
VY……Y 座 標 の 移動 用 ・ 50- 90 キー スキ ャ ン ・ ず か し い 。 そ こ で 、 簡 単に ける : 婦 ヨ ッ シ ャ 賞 。 


7 う 


性 


この ゲー ム の 主人 公 は 、 な ん と 奨 力 
団 の お に いさ る ん 。 あ る 日 、 な た い へ ん な 
内 骸 を し て か し て し まっ うた, 莉 労 し て 
密輸 し た 金塊 を 町 中 に バラ まい て し ま 
っ だ の だ 。 そこ で 回 収 を 命じ られ だ の 
だ が 、 あ わ て て 車 を 電柱 に ぶつ け て し 
まい 、 右 折 し か で き な く な っ て し まっ 
だ の だ 。 お まけ に パト カー は 追っ て 〈 


車 は 6| を 押せ ば 進行 方 向 に 対し て 右 


9ko* チ 


。 し 
へ 媒 神 


ン - 


、. 放 W 震 
串 ③ 酒 滞 二 
OSne(i の 導 古 如 冬 は に NuNnNS | 


BY 
\m 回 ゆき C 挟 さと うず VH ユ q | 


_ で 避 mmSY ロ は ーー 品 ぐ 如 環 中 


か 2 
2 


つう 
も 


で ご 
レス 


。vl9t 
で 軸 ぶ と は て (J 京 は ツン と て さっ 


ざき ぶ (S 間 H . 半 JR 須 貞 ゆ 生 


側 ど ご け に 曲がる 。 な ん と か 
この ポン コッ 車 ( ホ ) を 操作 


マ 石 に し ガ 曲 が れ な いん だ か 
ら ヘ ン な と ころ に 入 つ ちゃ う 
の 中 ク ラッ シコ / 


| EE BB BBB EEHEHEEBE 
日 日 日 日 日 日 日 日 日 日 BBEE BBB 
日 日 日 四 昨 日 旭日 登 

日 下 日 昌 日 日 BEE 


憧 提 SCORE 6 
EE 日 日 日 BBEEEB 日 ( 
詳 糧 時 旨 誠 引 


OHUEHERRRROHHRE 


し て 、 金 塊 (@) を 全部 ひろ 

つて は ほしい 。 も ちろ ん バト 上 
カー( 分 ) に つか まる と ゲー 目 
ム オ ー バ ー。 召 に ぶつ か っ 上 
て tb も 。 動 が ぐ な つう て ゲー 上 
の ポー デー パー だ 。 リブ レイ は 


人 Am スマ ギー。 


WIDTH 49,25:CONSOLE 9,25.9,1:COLOR 6.32.9:PRINT CHR$(12)::DEFINT A-Z 

FOR I=1TO6:LINE(9,Tx4-4)-(26.1Ix4-1 ) , "日 " 1,BF:NEXT:MC=ASC( " ホ ") :AC=ASC( "分 ") 
FOR 1=0 TO 5:READA:FOR J=9 TO 5:X=25-Jx4+((A AND 2^J)=9)x4:Y=lx4+1 

LINE (25-Jw4.Y)-(X.Y) "ENEXT:NEXT:FOR 1=9 TO 6:READA:FOR J=9 TO 4 

X= TX4+1:Y=1+JX4-((A AND2^J)=9)x4:LINE(X,JX4+1)-(X.Y) "9 "NEXT:NEXT:V=-3326 
POKE&HF3AC,AC:POKE8&HFD9C,MC:POKE 8HF37C,ASC( "円" ) :GC=ASC( "@") :KC=ASC( "日 " ) 
G=19+MX2:FOR 1=1 TO G:FOR J=-1 TO 9:X=RND(1)x26:Y=RND( 1 )*22:J=PEEK(V+Xx2+Yx1 


109 
209 
219 
212 
216 
225 
236 


29) く 232:NEXT:POKE V+Xx2+Yx120,GC:NEXT :F=1 :LOCATE29,5:PRINT "SCORE":S: 

240 DX=-1:DY=9:X=25:Y=21:AX=25:AY=1:EX=9:EY=1:BC=32:M=M+ 1 : IFMMOD3=9THENRESTORE 
390 IF INP(9@)=191 AND XMOD4=1 AND YMOD4=1 THEN DQ=DY:DY=DX:DX=-DQ 

319 NX=X+DX:NY=Y+DY :P=PEEK(V+NXx2+NYx129 ) : BEEP1 : BEEP9 

320 IFP=KCTHEN POKE V+NXx2+NYx129,249:BEEP:POKE V+NXx2+NYx129,KC:D=D+1:IF D<5 TH 


EN POKE V+XX2+Yx129,32:DX=-1:DY=9:X=25:Y=21:GOTO 319 ELSE 599 

339 IFP=GC THEN S=S+M:G=G- 1 : BEEP1 :FOR 1I=1TO109 :NEXT :BEEP9 :LOCATE34 ,5:PRINTS: 
349 IFP=ASC(" 円 " ) THEN IF G=9 THEN S=S-(D=9 )x19xM:FORI=1TO0299:BEEP1 : BEEP9 : NEXT :LO 
CATE19,9:PRINT" GOAL 11 "FORI=-1TO09:1=INPUT$(1) く >" "NEXT:GOTO199 ELSE 599 
359 IF PsAC THEN LOCATE 19.5:PRINT "COUGHT !!! "5:GOTO 599 

360 POKE V+Xx2+Yx129,32:X=NX:Y=NY:POKE V+Xx2+Yx120,MC 

499 IF AXMOD4=1AND AYMOD4=1THEN FORJ=-1TO9:DQ=EY:EY=EX:EX=-DQ:J=RND(1)-.7:NEXT 
419 NX=AX+EX:NY=AY+EY:P=PEEK( V+NXx2+NYx129):IF P=KC THEN 499 

429 IF PsMC THEN LOCATE 19,5:PRINT "COUGHT 117: EGOTO 599 

430 POKE V+AXx2+AYxX129,BC:POKE V+NXx2+NYx120,AC:AX=NX:AY=NY:BC=P:F=1:GOTO 399 
599 BEEP:LOCATE 19.9:PRINT"GAME OVER "::FOR J=-1TO9:J=INPUT$(1) く >" "ENEXT:RUN 
699 DATA 32.52.9.6,&H28.9.9,12.8.6,1.22.9,&8H2A.8.2.9.8H38,8,2,9,6,9,&H1C,16,2 
629 DATA 8&H28,&H9C,&H2D,&H099 ,&H18,8H98 ,8&H99 ,&H19,8H94,8H99,&H1D,8H14.8H16 


田 変 数 リス ト ・ EXEY…… パ トカ ー の 向き  ・ 田 プ ロブ ラム の 説明 ・ が 、 簡 単に ける に は 、 金塊 の 数 
MC,AC キャ ラフ マタ ・ コ ー : D…… が べ に あ だ つ だ 回 数 = ・ 100-240 初期 設定 ・ を 少な こし て みて は 。230 行 G= 
GCKO ドド : P…… 移 動 の と き 前 に ある キヤ : 300-360 自分 の 移動 ・10+M*2 の 10 を 適当 な 数 値 に 
Se の ラク タ ・ 400-430 パト カー 秘 動 ・ 変え る と いい で すね 。 全 部 で 、 
G…… 金 塊 の 数 ・ V……RAM ア ドレ ス ・500 の ー ム オー ルー ・ 3 面 ま で ある の で 、 が ん ば つて 
M…… 面 の 数 ・ NXINY…… 移 動 時 の 前 方 の 座 ・ 600 一 620 画面 デー タ ・ くだ さい 。 放 バッ チリ 賞 。 
XY…… 自 分 の 座標 ・ 標 ・ 男 チエ ツ フ ボイン ト ・ 

AXAY…… パ トカ ー の 座標 : DO…… 計 ・。 わり と お ず か し い ゲ ー ム で す : 


2 


遊び 方 


これ 、 ヴ ィ ク ジィ ブ と 読む の だ そう 


3 5 の だ の 


字 宙 歴 1035 年 、 が ガル チャー 人 の 侵略 
に よっ て デュ ラン 是 は 絶滅 の 危機 に 瀬 
し て いた だ た 。 そ を こ て 新 た に 開発 され た ビ 
ラミ ス と いう 戦闘 機 が 画面 下 に 登場 。 

キミ は この ピラ ミス を [1I3] キ ー て 左 
右 に 動か し な が ら 、|Z 一 で ウェ ー ブ 
砲 を 発射 し 、 敵 機 や や っ つけ て くれ 。 


StytSt9tt 
rry 湘 圧 9 事 琴 


で - 
デ 


| 
| る 
| と 
| 思 
| 思 

ま 

え 


向 ご ー ベ メー はご コ テーV ユ 壮 は は の 0 


ー 人 は と は OM 


還 変 数 リス ト 
F…… 敵 機 の ポイ ント 


M-…… 医 機 出現 度数 
〇 …… 敵 キヤ ラフ タ 


Ds が) 直 
X…… 目 機 X 座 標 
一 プロ ブラム の 説明 


10 一 30 初期 設定 


へ ぷ て eStA9t(tCC てき 用 出 SS 
(( SAS は ど 4J 革 ざき 肝 中. なさ コ 


さき のど rv 中 モー ロロ 放さ 圭 4 


ー ナ ス が だ 。 


リプ レイ は HOMECLR キ ー。 


も すえ る も えす も えす も も 3 朗 -)%、1 コ 
ボ ボボ ボボ ボボ は ほ ま ー 人 CO の SR だ 


英機 の 数 は 画面 下 ひ の インジ ケー タ ー 
で 表示 きれ る 。 目 盛り いっ ぱい に 
な る ま て 敵 が 増え を る と ゲー ム オ ー 
バー に な っ て し まう ぞ 。 一 定時 間 
辿 え る と 1 面 ク リア で 1000 点 の ボ 


移 等 


マウ ェ エー ブ 砲 と いつ より も 、 


/ リ 0g- つ づ @ 


掃射 介 み だ いな 感覚 。 


4 さき 9 
も 9 素人 ※ 玉 家 突 来 来 


上 党 表 トス / 


WIDTH49,25:CONSOLE,,9,1:DEFINTA-ZEDIMZ(15) :Z=&HF55A 
19:C=236 
D=9:X=17:F=F+109:T=T+1:M=M-21C=C-4:FORA=9TO15:Z(A)=9:NEXT 
CONSOLE9 , 25:PRINTCHR$(12):LINE(1.9)-(37.2)。"%"。5,B 
LINE(1.24)-(37、24)。 "ご"。4:LINE(13.24)-ー(25.24)、 "ドド 。2 
LOCATE13,9:COLOR7 :PRINTUSING" SCORE 提 折 "1SELOCATE11,2 


F=0:S 


PRINTUSING" HI-SCORE 


"1HILOCATE15.13:COLOR7:PRINTTSCENE 「 洒 T 


FORW=1T02999:NEXT:LINE(15.13)-(23.13).) ICONSOLE6,16 

FORB=1TO39:FORA=9TO15:A$=" "=1NP(0 ) 
X=X+(1=247 )x(X く 33) -(1=253)*(X>1) :LOCATEX,22:COLOR6:PRINT" ] 還 |“ 
I$=INKEY$: IFI$="Z"THENZ(A)=X+21A$= リ ー" 
L=AMODM: IFL=9THENGOSUB160 
K=(A+1)MOD16:IFPEEK(Z+Z(K)x2) >32THENGOSUB199 
LOCATEX+2,21:PRINTA$:Z(K)=0:NEXTINEXT 
S=S+1999:FORA=1T020:BEEP1 :FORW=1TO190:NEXTEBEEP9:NEXT :GOTOS9 
R=RND( 1 )*33+3:G$=CHR$(RMOD4+C): IFPEEK(Z+Rw2) 232THEND=D- 1 
LOCATER,5:COLORRMOD7+1:PRINTG$:D=D+ 1:LOCATED+12.24:COLOR2EPRINT" 軒 " 
IFD=13THEN219ELSERETURN 


BEEP1:D=D- 1:LOCATEZ(K) 5:PRINT" 


"ES=S+F: BEEPW 


LOCATE21 ,9:COLOR7 :PRINTUSING" 必 "いい SE:LOCATED+13.24:COLOR2:PRINTT PERETU 
FORW=1TO199:BEEP1 :BEEP0 :NEXT:COLOR3 
LOCATE7 ,13:PRINT "オーズ イオ 人 馬 、 介 画 一 4 ト 較 四 丁 較 :IFS>HTHENH=S 

LOCATE7 14:PRINT "自重 正章 目 園 ペア マ ア 還 還 WWAIT81.255:GOTO20 


40- 60 画面 表示 

90 メイ ン ル ー プ 開始 
100 目 機 表 示 
110 ウエ ー ブ 師 発 農 
120 英機 表示 サブ へ 
130 ウエ ー ブ 介 命中 か 
140 スプ ロー ル 
150 ンク ルリ 


160 一 170 英機 表示 
160 一 200 敵 機 撃墜 


2J(Uos280) クー ヘム オー/ ビー 
田 チ ェ エッ ンク フ ボ イント 

けつ ご こう 幸 中 で きる ゲー ム で 
す が 、 ゲ ー ム が へ だ な お 私 は 、 ど 
うし て も 2 面 を 突破 で きま せん 。 
そこ で 、 こ の ゲー ム は 、 画 面 上 
に 敵 機 が 13 機 出現 する と 、 ゲ ー 
ム オ ー バ ー に な る の で 、180 行 D 
ーー13 を 、 適 当 な 数 値 に 変え て み 
まし だ た 。 


まだ 、50 行 LINE (13, 2 
ー(25,24) の 13, 25 を D に 入力 し 
だ 数 値 に あわ せ て 、 変 えれ ば 、 
画面 下 ひ の イ ンジ ケー タ も 、 う ま 
ぐ 改 造 で きま す 。 

敵 機 キ ヤラ が 、 気 に 入ら な い 
人 は 、20 行 の び ご の 値 を ガサ えて み 
て ぐだ さい 。 衣 ヨッ シャ 賞 。 


Z う 2 


! 
WW 


mWW 


と 、 絵 の 衣 れ る の が 止ま り 、 ゲ ー ム ス 
婦 一 、 

は に クー が の の の で て おり まし ん (とい 黒い マス を [214[6I8| キ ー で 上 下 左 
CO グ 二 は まだ 生き で いて 、 よそ を で 活動 の し を ん と よ の よう に ん ゆ ひ ペ か 


一 生 懸 命 働い て いま す )。 プラ ス 、 バ パ ズ えて ほし い 。 黒い マス を 上 に 動 あ みす と 、 
ゝ ふ ル な ん だ か ら 、 拍 手 / 上 上 の コマ が 黒い マス の あっ た し と ころ に 
遊び 方 0 


作者 に よれ ば 、 家 庭 用 テレ ビ で 見 た 移動 する と いう 仕組 み 。 例 の 15 ゲ ー ム 
RUN さ る せる と 、 ま ず 、CG. が 画面 に ほう が 多少 ぼけ て 、 き れい に 見 える ん を 思い 出し て や れ ば いい と 思う 。 


現れ る 。 ん 、PC-8001 で C.G……… / で は な いか …… と AS だ た 。 も と の 絵 を 見 た か っ た ら 6|5| の キー を 
20 が 宣 ん て 思う て いる と 。、 こ さて 、 絵 が 出 て きた と ころ で 、 適 当 押せ ば 少し の あい だ だ け 見 られ る よ 。 
れ が ちゃ ん と し だ た パズル な ん で すね 。 な キー を 押す と 、 黒 い マ ス (要する に 完成 し た ら リ ター ン ・ キ ー を 押し て ね 。 


イラ スト の 好み は と や か くい わな い ブラ ンク で す ) が 勝手 に 移 
こと に し て 、 そ の 男気 を か な う 、 と 今 動 し て どん と どん 絵 を ムチ ャ 
ググ た SW ほ し て いく 、 を の ラ 
シダ ム ワ リ ー ク を じっと 見 て 
いる だ け だ と 取り が かえし が 
つの が で だ の の て 、 人 当 全 OO 
と ころ で ANYKEY を 押す テ 


ャ バズ ル 作 成 完了 。 (8 も 9 人 測 陸 


2 寺 欄 2 く で を テー 徹 う : を っ て 輝く 
うい ち ど カ ワイ ちゃ ん に SS っ 8 おけ HRRNMP の RE 
も ど ご レ C 梓 。 


ES 


に 2 
し 】 
0 2 
人 2 


KS 
こつ 


JfY・ 還 叶 六 鞭 ) 水 


の | 


AE 
に | 


穫 の 
| 人 癌 
1 
| C 齢 
| | 化 
8 6 の 
| 0 お 
| 0 そ 
| | る 
5 m し 
ま 1 と 
今 

| を た 日 
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| いろ 
| た 
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は は 
財 カ 
ーー り 
歳 ジ 
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7 が 氏 
の ) よ 
低 1 
年 測 
齢 さ 
牧 ん 
2 9 人 
自 さ 
人 え 


| 本 H 計 と YO と と 品 ご させ S 陸 好 


ーJSteoSt は 潮 
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19 ′ If you want to reverSe thiS 

2 ‥ SCTeen, PleaSe PuSh fi・1 Key. 
61/ 還 還 旨 放 よさ メス よそ そそ メス ズ エエ イエ エス エエ エネ そそ エエ エマ テテ エエ エメ エエ エメ マズ. 
40 | ※ くく The29 >> し 3 
59 ' ※ Version 7.3 し 3 
69 し 3 N-BASIC / PC-80991 3 
79 ' ※% by Midnight・Sun し 3 
809 し 3 May 1984 し 3 
9 EE そそ そよ そそ テス テテ テテ エエ そ テ エメ テテ テテ エエ そそ エエ エエ エエ エエ エエ エエ コ 
1099 


119 CLEAR399 ,&HCEFF:DEFINTA-Z:DIMPT(199) ,SP(199):X=9:Y=2:KEY1 "out81.32"+CHR$S(13 


129 WIDTH89,25:CONSOLE9 , 25 .9.1:COLOR2.9,1:PRINTCHR$ も (12):OUT81.33 

139 RESTORE550 : ZZ=&HCF99 :DEFUSR9=&HCF99:DEFUSR1 =&HCF22 

149 READZY$:IFZY$ く >"w"THENPOKEZZ , VAL("&H"+ZY$ も ) ZZ=ZZ+1:GOTO149 

159 A$=" PC-8991 << The29 >> by Midnight・Sun":LOCATE4,24:FORZZ=1TOLEN(A$):PRIN 
TMID$(A$,ZZ.1)::FORYY=9TO59:NEXTYY 、ZZ:RESTORE439 : GOSUB499:LOCATE4.24:PRINTA や も 
169 RESTORE529:FORXX=26TO156STEP2:READYY:LINE(XX.9)-(XX.YY) ,PSET:NEXT:RESTORES3 り の 
:FORXX=126TO148STEP2:READYY:LINE(XX,YY)-(XX、99) ,PSET :NEXT:PSET(2、16):PSET(2.17): 
PSET(119.9):PSET(149.9):PSET(151,9) 

179 LINE( 2,32 )-(31.47) ,PSET ,BF :LINE(3,33) -( 39 , 46 ) ,.PRESET , B:PSET(9.32):PSET(9.47) 
189 RESTORE569 :FORZ=&HF359TO&HFE99STEP120:ZZ=0 

199 READXX,YY$:IFYY$="x"THEN299ELSEPOKEZ+ZZ 、XX:POKEZ+ZZ+1 VAL("&H"+YY も や も ) ZZ=ZZ ォ 2 
GOTO196 

299 NEXT:ZZ=USR1(9):GETQA(1.8)-(15.11) PT:COLOR7 

219 LOCATE47.24:PRINT"Push any key"::A$=INPUT$( 1) :BEEP1 :BEEP9:LOCATE47.24:PRINTS 
PC(12)::TT=9:GOTO239 6 

229 A=INT(RND( 1 ) x4 )x2+2:A$=RIGHT や (STR も $(A) ,1):IFVAL(AL$)+VAL(A$ も ) く >19THENGOSUB260 
239 LOCATE47,24:PRINT"Leve1:":TI::IFINKEY$ も =" "THEN229ELSELOCATE47,24:PRINTSPC( 1.5 ) 


249 GOSUB429:TIME$ も = "99:99:99" 

259 LOCATE48.24:PRINTTIME$::A も =INKEY$: IFA$=" "THEN259ELSEBEEP1 : BEEP9 : GOSUB260 :GOT 

0250 

269 DX=X:DY=Y:IFA も ="2"ANDY く 5THENDY=Y+ 1 

279 IFA$= "4 "ANDX >9THENDX=X- 1 

289 IFA$= "6 "ANDX く 4THENDX=X+ 1 

299 IFA$="8"ANDY>9THENDY=Y- 1 

399 IFA$= "5 "THENZZ=USR(9) :FORZZ=9TO0999:NEXT :ZZ=USR( 0 ) 

319 IFA$=CHR$( 13)THENGOSUB379: IFOKTHEN390 

329 IFDX=XANDDY=YTHENRETURN 

339 AL$=A$ 

349 GETQA(DXxX15+1、DYx4)-(DXx15+15,DYx4+3) .SP 

359 PUTQA(XX15+1 ,Yx4)-(XX15+15.Yx4+3) ,SP:PDTQA(DXX15+]1 .DYX4)-(DXx15+15,DYx4+3) ,P 

T:TI=TI+1 

369 X=DX:Y=DY:RETURN 

379 OK=-1:RESTORE549:FORSY=9TO5:FORSX=9TO7:READJD:IFPEEK( &HF391+SXx19+SYx699) く >J 

DTHENOK=9 

389 NEXTSX ,SY: RETURN 

399 PRESET(2.16.5):PRESET(2.17.5):PRESET(119.9.1):PRESET(149.9,1):PRESET( 151 .9,1 

):LINE(9,.32)-(31,.47) ,PRESET , 5 .BF :LOCATE48.24:PRINTTIME も $::GOSUB429:LOCATE9 9:A$= 1 

NPUT も ( 1 ) : RUN 

499 READZ1.Z2.Z73.Z4:IFZ1=9THENRETURN 

419 LINE(Z1.Z2)-(Z3.Z4 ) ,PSET :GOTO04099 

429 FORZZ=9TO19:FORZX=9TO59 :NEXT : BEEP1 :FORZX=9TO59:NEXT : BEEP9 : NEXT : RETURN 

3 人 9 DATA55。31 59.45。 59、45.61 6W、 61.60.62.63。 62.63.09.72。 69.72 7 アア, 79。 7/。79.9 

8,.86,。 91.87。111.84, 111.84.129.77,。 87.87.85.99、 127.79、.125.99, 125.99,126.99. 13 

9.73,145.67,。 145.67,.148.57。 148.57.147.53。 147.53.144.51, 144.51.134.74 

449 DATA134.74.129.89, 129.、89,.136.52。 136.52.123、28,。 123.28、128,48, 128.48.104,1 

6 。 194.16.104.28。 104.28、197.38。 107.38.101 32。 101.32.90.15, 90、15.90.27 99.27 
。93.39,。 93.39、81.28。 81.28.72.13。 72.13.74、33。 74.33.65,.27。 65,.27.69,19 

459 DATA6g.1.61、29。 61 .29.。63。39。 63.39.55.31 , 57,、40.56.43. 56,43.57、50 。 5/ 50.6 

55。 56。49、42。9 み 2、 42.、32、83.20。 939.2、25、 作 、. 64、33.68.31 、。 74.90 76 30 、 108.33、111 

3111 3934117、3S、 78、50。 745 、 45、 ア 1 4 1 、、 イ 1 、41 、 74 27 。 7 397, 79 38 

469 DATA78.38.89,46, 89.46.79.59。 79、38.83.48。 83、48.83.52、 83.52.809.58, 89.58,8 

ジ 2、68。 74 397 。71 37。 71..37.69.39。 69.99.68.42。、 116.55.110.49。 119.49。111 .94、 11)。4 

4。114.42。 114.42、118.44、 118、44.129、59, 129.59、118.55, 118、55.116.58 

479 DAYAI99、42。111。41 。、 111.41.114.42、118.44.123.49、 129.49、124.54 。、 75 52。 7 752 
12、58 114、5B。 67。49.68、37。 68,37 ア 771 、35。 71 95、77、36、 109。40。11 1.39。 111.99.119 
42。 119.42.1283.46。 123.46.129.5! 。 98.68.95、70。 95 70.99。71 。 91 。71 、8b。66 

489 DATA92.75.93.75,。 73.48.72.46。 72、46.73.45。 73.45.75、48。 75、48.74、44。 74.44,7 

5 、41。 75,41.76,41. 76.41.78,45。 78.45,.77.48,。 112.54.112.49。 112.49,114.46. 115.,4 

7ZeU15。53。 115。53.。1.14.55. 115.55.145.58。 115..53.1J7.51.。 1117.St.118.53 

499 DATA118.53.117.55, 72.42.75.38。 72.44.77、38。 77.49.77.49。 77.42.78.43, 111.4 

5。 414.42。 T11。47.115.43。 115.45.。.117.43。 115。47。117.45。 116、48.118。46 。 117 .49..1.16 

。48。 119.59、129,49,。 111.49,.111.49、111、51、111.51, 76.59.76.59, 113、56.113.56 

599 DATAS56、35 .56。42。 69、28.69.37。 72.23.72.32,、 99.27.90、37。 194、28.194.35。 124,3 

ちら <124、43。 132.69.132.77。 184.61、134.74。 136 92.136 7 。 64.709.9 79、 6/、72.9 2。 7 

9.75.9.75.73.79.9、79, 89.84.9.84、 83.99.9.99、5、79、9、85, 19.79.9、.99 

519 DATA15.79.7.99。 29,.79.15.99, 25.70.22.99、39.79.39.99. 35.79.37.99. 49.79.45 
.、99, 45、79.52.99, 59.79.69.99, 55.79.67,99,。 69、79、75.99、 65.79.82.99、9.9.9.9 

2 DATA1。5 0、15。20.22.25、206 、30 39、45 36.38 89.41.81 、33.16 20 23.27 28.30。12.1 4 
18.21、24.28.39、32.34.14.16、19.22.25、28.32.15.17.29,22.25.28.39.33.36,38.28.31.3 

5.39.42.48.51.64.69.55.51.52.53.99.99.99.99 

539 DATA85.82.82.89.77.75.74.73.71.69.64.58 

5 DATAO、0、15.15.15、15、15.15 4, 、15.91 15.15、15.15 9@.255 。0 0。134 0.8。15。0 9。 ひ 。! 
12.97.9.9.23,.192.9.48.8.33.9.34.15.9.9.9、9.9.9.9,9 

559 DATA1.B8.B,11.9.D9,21.9,F3,ED,B9,1.B8.B,11.9.F3.21.9.DD,ED,B9,1.B8,.B,11.9,.DD 
.・21.9.D9.、ED,B9 .C9、1.B8.B,11.9.DD,.21.9.F3.ED,B9 ,C9,※ 5 

569 DATA9.B8,.14.38.9.x,9,B8,15.38.9,*X,9、B8、15,.38.9、X,9、B8.16.38.9,X,.9.B8.17.38.3 

7.F8.39.38.46。F8,47.38.9,x。9.B8,.19.38.31.F8.32.38.37.F8.49、38.46.F8.48.38.54,F8, 

55.38,.9,X.9、B8.29.38.31.F8.33.38.37.、F8.41.38.46.F8.59.38.54.F8.57.38,.0,※ 

579 DATA9,B8,21.38.32、F8、35.38.37.F8.42.38.46.F8,51.38.54、F8.58,.38.9,%X、9、B8.23.3 

8.32、F8,、44.38.47.F8.52.38.54,F8.69.38.63。F8.、64.38.9.X,9.B8.26,.38.39.F8.61.38,.64。, 

F8.65.38.9.*,9.B8.28.38.29.F8,.37.B8.49.、F8.63.38.65.、F8.67.、38.9.x.9,B8,29,.F8 

589 DATA57.B8.69.F8.68.38.9、*、9.B8.39.F8.69.38.9,xX、9,B8.31.F8,.68.38.73.F8,75.38 、 

9,*.9.、B8.31.F8.68.38.72、F8.75、38.9.*、9.B8.32,F8.68.38.71.F8、74.38.0,x,9.B8,.33,.F8 
57.38.79.F8、74.38.9。、w。9。BB.35.F8、67.38 .69、F8.72.38.9。\*,、9.58.37,F8。66 .38 

599 DATA68.F8.79.38.9.*.9.78.39.F8.65.38.9.*、9.98、42.F8、64.38.9.*,9,B8.45、F8.64、 

38.9,%X。9.D8.45、F8.64.38.9,xX,9.B8.44、F8.64.38.9.*.9.98.5.88.43.98.44.F8.64.38.9,※ 

699 ` by Y.Ozaki Nagoya Univ. May 1984 
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 、 ヾ ン ェ ッ 


の と だ ZIA7 


の ど と /7 三 7 也 

田 変 数 リス ト LT 
DX.JDY…… 黒 ピー ス の 移動 先王 還 
X.Y…… 黒 ピー ス の 座標 HH 
PT.SP……GET,PUT 用 HHT 
出 あな ぐす し だ 回 数 キイ 
プ ロブ ラム 説明 HHTT 
110 こ 140 初期 設定 THT 
150-170 作画 (ライ ン ) 全 
180-190 作画 (カラ ー) 
200210 入力 待ち 
220-230 画面 を くず す 
240 ご 360 キー 入力 、 ピ ビー ス 秘 QO 

動 〇 
370380 完成 判定 Le 
390 END 娘 理 肖 
400 ご 420 ライ ン 用 サブ ルー チ 
430 ご 530 ライ ン 用 デー タマ 
540 完成 判断 用 デー マ 
550 機械 語 デ ー タ 
560 ご 590 カラ ー 用 デー タマ 
田 チ ェ エッ フ ボ ポイ ント 


ゲー ム 中 5 の キー を 押す こと 、 


少し の 間 、 


完成 図 ザ 見 られ ます 


が 、 ご この 時 間 を 長 ぐ し だ い 人 は 、 
300 行 の 上 〇 ORZ〆 テ 0 「O 999 の 
999 を 大 きぐ する と 、 見 られ る 時 
間 が の び ま す 。 

まだ 、 繧 に 関係 の な い ド ツ ト 
が で ます が 、 こ れ は 、 同じ ピー 


ス が な いよ うに る だ ため だそ う 


で 、 繧 が 完成 する と 、 き れい に 
消え ます 。 衣 -6001 で グラ フ 
イッ ク ガ つ パ ズル な ん て すご い 。 
繧 は ちよ つと イマ イチ だ けど サ 


イコ ー 党 。 


今 い ちば ん 新しい 市 販 ソ フト を ミニ 紹介 。 これから ポ シ エ ツ ト で は 、 市 販 ソ フト 情報 の まひ か 、 い ろ ん な お も し る 情報 を 掲載 エル / 
し て いき ます 。 み ん な の 意見 や 新 発 見 な ども どん どん 取り あげ て いく ぐ の で よろ し ぐ ( 詳 し ぐ は 98 一 99 ペ ー ジ を 見 て ね > 
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の と 7 了 7 ア 7 

一変 数 リス ト オキ トキ 

68 自 機 の 座標 すす す 

DEFLNTA-Z:CONSOLE 9.25.9.1:WIDTH 49.25:PRINTCHR$(12) XA,YA…… 英 機 の 座標 ー キ トキ て 
HE=34:AX=38:COLOR 2 0 0 ーー ウー キー AR 中 ……| ーー TELTTIL 
FORNT=9TO14:READDR$ AR お 英機 デー ツ FLLTIT 
FORNE=9TOHE:LOCATEAX,7:PRINTDR も :" "EAAX=AX-1:BEEP1 : BEEP9 : NEXTNE 2 SS か CN サキ 
AX=38 : HE=HE-2:NEXTNT :OUT81.33:BEEP:WVIDTH40 ラニ エピ | Na TTTT 
COLOR 7:LOCATE6.13:PRINT"4 < > 6 & Space bar" 張 司 敵 機 の 種類 の 判定 FTTTT 
LOCATE9.18:PRINT"Strike space bar!":IF1INP(9)<>191THEN79EILSEPRINTCHR$( 12 ) ご W…… 新しい 敵 の 判定 キキ て 


カ ~ メン 
COLOR 7:PRINT" Score 09 Time BU 20 紀 且 8 


RN…… 運 動 パ ター ン 決 定 用 
COLORI:LINE(1、1)-(169.10) .PSET .B 


FORNE=9T039:LOCATE INT(RND(1)x35)+2、INT(RND( 1)x2)+4 、 
COLOR INT(RND(1)*7)+1:PRINT"・":NEXTNE 回 炎 同 の デー ダリ ー ド 用 
シン ヨ キ セ ッ テイ 


MS や お …… メ ッ セ ー ジ 


X=29: AR$ も =" ドー" :XA=20:YA=5:Sw=9 
TI299:BU=2:LBsSTFc9 OR 敵 欄 カ ラー 

カス タム A ウ イン ク ~ ファ イタ ー SR…… ズ コア 
COLOR7:LOCATEX-2.2tEPRINT" CA "(0 
COLOR2:LOCATEX,22:PRINT"V" に し 世 目 機 の 数 
IF TF=9THENCO0=5ELSECO= 1 軒 プロ グラ ハム の 説明 
COLORCO : LOCATEXA- 1 ,YA:PRINTAR$ 
IFYA く >21THEN240 : ELSE2.39 10 一 120 画面 表示 
IFX=XA OR X-1=XA OR X+1=XA THEN GOSUB720 130- こ 150 初期 設定 
LOCATEX、22:PRINT" " 、 
IFINKEY$=" "THEN GOSUB539 160<200 自 機 プ リン ト 
IFINP(9)=239 AND X>3 THENX=X-1 5 思 
IFINP(9)=191 AND X<36THENX=X+1 210 一 220 英機 に ぶつ お が つ だ が 
4 2 0 230…27( キー サー チ 

上 N RN=INT(RND( 1 ) *5 ) 

IF SWw<>9 THEN379 260 一 420 英機 秘 動 
IFRN=9THEN RESTORE830 430<470 弾 数 、 エ ネル ギー 判 
IFRN=1THEN RESTORE860 9 
IFRN=2THEN RESTORE889 断 
IFRN=3THEN RESTORE899 5 5 
IFRN=4THEN RESTORE919 時 510 敵 出 現 位置 計算 
SW= 1 520-700 ビー と 英機 撃墜 
READ RX.RY:BEEP1 : BEEP9 
LOCATEXA-1.YA:PRINT" 710 一 760 自 機 爆 発 
IFRX=99THENGOSUB499 00 ン 
IFXA>34THENGOSUB499 790-810 END 才 理 
IFXA く 4THENGOSUB499 820-920 敵 の 動き DATA 
XA=XA+RX:YA=YA+RY 還 チ ェ ッ フ ボ ポイント 


COLOR 7:LOCATE26,1:PRU.TBU 
Ti=TT-1:LOCATE18、1:PRINTTI 
IF BU く <1THEN GOSUB 719 
IF TI く <1THEN GOSUB 719 


敵 の 動き も お も し ろく ぐ 、TIM 


GOTO 189 ド 

"タイ Fighter ノ イチ ト Dearth fighter OVER の 愛 委 が ある の で いい 

SW=9:RX=9:YA=5:XA=INT(RND(1)x19)+12 の で す が 、 ハ イス コア 等 の 基本 

IF INT(RND(1)x19)=9 THEN AR$="]@1" ETF=1 ELSFAR も = リト ロリ":TF=9 的 要素 が 不足 し て いる よう で す 
1 ヾ O 


RETURN 
し ヒド エー ム ト Tiefighter ノ ルク ハツ 
COLOR 2: BU= BD- 1 
LINE(X.29)-(X。4)。 "1" 
LINE(X.29)-(X。4)。" 「" 
IF X く <>XA THEN RETURN 
BL=XA:BR=XA:BY=YA 
BEEP1 : LOCATEBL,BY:PRINT" く < くく "ELOCATEBR,。BYEPRINT リー >>『 
IF BL く <5 THENBL=5 ELSEBL=BL-2 
IF BR>34THENBR=34 ELSEBR=BR+2 
BEEP09 
IF BL<5 AND BR>33THEN639:ELSE580 
LINE(2.YA)-(38.YA)。" “ 
[F TF=9 THEN 679 
COLOR7:FOR_ NE=9TO59:LOCATEXALYAEIPRINTT3090" ELOCATEXA、YAEPRINT" 
NEXTNE: SR=SR+260 
GOSUB490 
SR=SR+49:COLOR7 ELOCATE7、1:PRINTSR: BOO=BO+ 1 
IFBO=4THENBO=9:TI=299:BU=20 
RETURN 
A-Wimn9 ルク ハツ 
IFBU く 1THENBU=109:MS も ="BuUlle1 1S noO!" 
IFTI く 1THENTI=199:MS$= "Tijmne 1S OOVCF 
FOR _NE=9TO69:BEEP1:LOCATE15.19:BEEP9:PRINTMS も ENEXTNT 
LOCATE15.19:PRINT“" "iMS も = リリ 
FORNE=9TO29:BEEP1 :OUT81、33:WIDTH49:BEEP9: NEXTNE 
COLOR7:LE=LE-1:LOCATE3S 、1:PRTNTL 上 


まだ 、 ゲ ー ム で 自 機 は 、20 発 の 
ビー ム (英機 乾 発 で 20 発 補 結 ) 
し ガ 使 えな い の で 、 蛋 生 に ……。 

TIME を 変え る 場合 は 、150 行 
200 を 適当 に ガサ えよ う 。 ビ 
ー ム 弾 数 の 場合 は 、90 行 お よび 
150 行 の BU の 数 値 を ひえ れ ば よ 
し 。- 表 / パ ッ チ リ 抽 。 


1F LE< >9THENGOSUB499:RETLUIRN 
Game Over Sub 
COLOR 7:LOCATE19、19:PRINRT"TG 3 m e oO V Ge T" 
LOCATE19.12:PRINT"StYike 「sS。 key "EEWAIT4.8.255:RIIN 
DATA SJTJAJ、R。 .WJA、R. ら 65、 、F,T.G,H.T 
DATA 0919 1.90.1、0 ま 0 1 見 13 1 、1 1 1 1 し 、0。 に 1 。@ 、) ,、) =1 
DAT 和 AA 1 ルー! で 1 0 | のり 、 こ 1 。 こ =] と 1 1 と 1 デー) 91 0。<1 、W =1 1 
DAFA ニー1。 も 、 こ 1/1。 攻 も 人 、1、 も 、15 ま 1、 ト し 、 1 2 と 2 に の 12) 1 2、 ト 9 6 
AT 敵 あり も > まっ 小作 と 1 、 上 ゃ や も ニル よこ すす トニ ルル 。 5 
DATA -1,1.99.9 
2 は 0 2 作り 。 作 の 0 トー 。] 0 りり 0 。1 1 99。09 
DA も 2 8 も 10 も キ 。 0 は 20 キッ テト) こま ん / ド ん = と も 1 
DD 作っ ト 人 攻 と も トド の の が 人 1 も も 、1 1 1 1 021 0、 も 9 の 7。 具 
DAA 229 2 と 9。2、 有 0 2920、2。 ま 2 1 1 1 の 、1 9.。1 90。1 0、1 1、|、- う 
DATA 0、-1.9,-1.9.-2.9、-2.9。- つ 、9、-2.90、-2.9.-2.99.9 


ヴォ ル ガ ー ド デー ビー ソフ ト (会 011-251-7462) PC-8801,mk II・FM- 7 /77・X 1 (C) の テ ー プ \4,500、3.5・5 イン 
チ デ ィ ス ク (X1 用 除く ) \6.800 信 高 度 な は スク フ ロー ル 型 シュ ー テ ィング ゲー ム に 3 機 が 合体 する メカ アニ メ の 楽し さ 。 
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*・ く PL CE 内 谷 鈴 
・・ マ の は 
*・・ ヤ OH は て 選 ひ 角 お う 
・・S す の 多 だ 

"て まう か アマ <②2) の 


4 プロ ・ レ ベル ガ ア マ ・ レ ベル が 選ん 
で ね 。 も ちろ ん 最初 は 素直 に の か ら 。 


あ だ り 一 常 は ダイ ヤ ト ロン 工場 。 キ 
ミ の 使命 は 、 ダ イヤ トロ ン 工 場 を 監視 
する ポリ スマ ン か ら 逃 げ つ つ 、 工 場 を 
次 々 に 爆破 し て いく こと に ある 。 

I214I6I8|I キ ー で 上 下 左右 ! 
か し 、 0 
移 に ぶ て 体 当 た りす る と 、④ ゐ が @ に 
了 了 22PO RE 
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_ ar {1 DR 
回 の ご 半 さよ) 半 妥 計 丈 は 


| と 


〆 の 


- ぶ を 動 


この タイ マー の マー ク が 全部 消え ん な い 
うち に 、 工 場 の 真中 に ある 葵 や アル フ 
アベ ペ ツ ウド に 全 導 だ の し よう 。 そ で の が 
い 丸 に な っ だ たら 、 時 限 爆弾 セッ ト 完 了 
だ 。 爆 発 に 巻き こま れ な いよ う 、 る きっ 
と 送 け な く て は いけ な い 。 
に ある アル ファ ベッ ト は 、FIREBUG 
の 順に と っ て いく と ボー ナス が も ら え 
る 仕組 み に な っ て いる 。 
順番 が 違っ た り 、 途 中 
で 劉 を 胡 破 し た りす る 
と ボー ナス は 無効 。 
の 7 の を ちょ いざ ちゃ ゅ 
ご 動き まわ る ポリ スマ 
ン は 、 キ ミ を 見 つけ る 
と 1 発 ビ ピス トル を 打っ 


GDHODG は 
主 失せ 谷 
2 


マ バ パスワード を 完成 さ 
紀 MS 4 


工場 の な か 


て て る 。 これ を 防 で に は 、 身 あか くす 
MAEDA 
を 記 久 か えた し て し まえ を ば いい 。 ぐ で の 大 
は ボリ スマ ン の 進行 を くい とめる 働き 
が あり 、 無 制限 に バラ まけ る の で お お 
い に 活用 し よ う 。 石 が ジャ マ に な っ た 
ら |Z| キ ー で リセ ッ ト も で きる 。 手順 が 
大 切な 思考 型 リ ア 9 
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79 COLOR6 , &H29,9:PRINT CHR$S(12): 


80 


[[FIRE BUG]] 1984 年 6 月 16 日 
WIDTH49,25:CONSOLE9 ,25.9,1:LOCATE19.12:PRINT "チョ ッ ト マッ チ 11 "EGOSUB1539 
人 eco ツウ 当 セツ アゴ や で らら っ ご 
DEFINT A-Z:DIM D(11),.DC(11.31):GOSUB 1319:HS=9 


DEFUSR9=&HD999 :DEFUSR1 =&HD193:DEFUSR2=&HD1DA:DEFUSR3=&HD1DF 
DEFUSR4=&HD1E4:DEFUSR5=&HD1E9:DEFUSR6=&HD1B8 


SC=9:YB=9:BOM=9:MAN=&HE8:MNO=6:LVK=1:PAGE= 1 


99 FOR 1=3 TO 11:BEEP1:COLOR6:LOCATEI,3:PRINT" FIRE" ij :BEEP9: BEEP 1 


199 
119 
129 
139 


COLOR6:LOCATE28-1.3:PRINT"BUG "5 :BEEP9 : NEXT 

FOR J=9 TO 2:FORI=9TO1:BEEP1:LINE(19-1,1-I)-(21+I,5+1) "| リ B:BEEP9:NEXT 
FORI=9TO1 :BEEP1:LINE( 109-1,1-1)-(21+1.5+1) "XX"。RND(1)x7+1.B:BEEP9:NEXT: NEXT 
FORI=9TO03999:NEXT:FORI=9TO15:COLOR2:LOCATE1 8:PRINTLEFT も ("ーー ゴー ク ヒ シレ イ --" 1) 


BEEP1 :FORJ=9T099:NEXTEBEEP9: NEXT 


149 


FORI=9TO1599:NEXT:COLOR4:FORI=9T037:LOCATE9,9:PRINTLEFT も ("キミ ノ シメ イル タイ ヤ ト ロン コ 


ウシ ~ ヨウ ヲ カイ スル コト タ ^~11"。1)j:BEEP1 :BEEP9:FORJ=9T0159:NEXT:NEXT 


159 


FORI=9TO1999:NEXT :COLOR3:FORI=9TO13:LOCATE25,19:PRINTLEFT も ("サン トウ ブー イノ ブル ・・・ "1 


)::BEEP1 :FORJ=9T099:NEXT:BEEP9 : NEXT 


169 
179 
189 
199 
290 
219 
220 
239 
249 
259 
260 
279 
280 
29 
3909 
319 
329 
339 
349 
359 


COLOR5 : LOCATE5 , 12:PRINT "< KEY >": 
COLOR6:LOCATE8,14:PRINT"8"5:LOCATE8.18:PRINTT2"ELOCATE6,16:PRINT"4 $ の 0 67: 
POKE&HFA1A,&HIE:POKE&HFB9A,&H1F:POKE&HFA99,&H1D:POKE&HFA94.&H1C 

COLOR7 ILOCATE1.20:PRKINT [XX]・・STONE SETT : 

LOCATE1.21:PRINT "【[Z]・・STONE RESET " 

COLORS iLOCATE21.12:PRKINT "< く CHARACTER 25 

COLOR4:LOCATE19,14:PRINT "@ "75:COLOR7EPRINT "・・BOMB SET POINT"5 
COLOR1:LOCATE19.16:PRINT "9 ECOLOR7EPRINT "・・POLICE MAN" 
COLOR6:LOCATE19.18:PRINT "の 95 ECOLOR7EPRINT "・・Y0U" 5 

COLOR6 :LOCATE19.29:PRINT "まま ECOLOR7EPRINT "・・YOU (BOMB) "5: 
COLOR7:LOCATE19.22:PRINT"※・・STONE" 5 ELOCATE8,24:PRINT" プ ブロ =(1) or アマ = ミ (2) 7275 
A$=INKEY$:IFA も =" " THEN 279 

A=VAL(A$):IF A>22 7 ) A<]1 THEN 270 

LOCATE 27.24:PRIN Ai:LEVEL=A:AA=USRS (9 ) 

COLOR5 , &H29.9:PRINF CHR$(12): 

MX=14:XM=MX:MY=12:YM=MY:HOUSE=9:WCK=1:FOR IT=&HE999 TO &HE9A9:POKE 1,9:NEXT 
POKE&HE999 ,MX+ 1 :POKE&HE991 ,MY+1:POKE&HE992.D(LVK) :POKE&HE994 9:GOSUB1459 
So し が ググ 4 どー ロラ ーー うこ 

1=9:FOR Y=1 TO 21 STEP4:FOR X=9 TO 25 STEP6 

1=l+1:TF DC(LVK, IT)>6 THEN A=FIX(DC(LVK,1)/19):M$S=MID$( "FIREBUG" ,DC(LVK,T)-A※ 


19,1):GOTO379 


369 
J79 
380 
399 
499 
419 
420 
439 
4409 
450 
460 
479 
480 
490 
S99 
っ 1 
ゃ アス / 
つ さ の 
っ 49 
c】 
S69 
っ 70 
S980 
S99 
699 
619 
620 
639 
649 
6509 
669 
679 
680 
699 
799 
SE 


M も ="@":A=DC(LVK, 1 ) 

ON A GOSUB 399,419,439,459,479,489 

NEXT:NEXT:GOTO 599 

COLOR5:LOCATE X,YI:PRINT "に ELOCATE X,Y+1:PRINT 中 還 較 : 

LOCATE X,Y+2:PRINT "の ハ 昌 "7:COLOR4 :LOCATEX+2.Y+1:PRINT M$ も ) :RETURN 
COLOR5:LOCATE X,Y:PRINT "イネ 、/W "5 ELOCATE X,Y+1:PRINT "| 画 還 に ( 

LOCATE X,Y+2:PRINT "3、 COLOR4:LOCATEX+2.Y+1:PRINT M も Bi ERETURN 
COLOR5:LOCATE X,Y:PRINT "人 衝 キ RA" : 

LOCATE X,Y+2:PRINT " キ "ECOLOR4 :LOCATEX+2。Y+1:PRINT _ M$ も : ERETURN 
COLOR4:LOCATE X,Y:IPRINT "ゴゴ MV" IIELOCATE X,Y+1:PRINT "Lo PT 

LOCATIE ル .Y27PRKINT ん の 17RBTIURN 

COLOR4 :LOCATE X,Y:PRINT "会 、 全 に に に ELOCATE XY+2:PRINT "ERETURN 
COLORG2LOCAIE XYYPRINU / 光 ILOCAID YOTIIFRNINI “ 暫 

LOCATE XY+2:PRINT "ニー "ECOLOR2 ELOCATE X+12.Y+T1EPRINT の 5:RETURN 
ELTNE(30.9)-(30.24)。 "1 3ALTIMNE(32.9)-(32 24)。"1" 35LINE(31 .9)-(3 は 1 、24) 。 m 2 
FORI=1TO8:COLOR5:LOCATE31 IE:PRINT MID も ("TIMER. "1.1): ENEXT 
COLOR2:LOCATE33。 1:PRINT "FIRE" 1 ELOCATE35。 2:PRINT "BUG" 
COLOR6・LOCATE33。9:PRINI "※※※※※ り "52:LOCATE33 3:PRINT |※※※※※ り < 
COLOR7:LOCATE34 21:PRINT "PASS": 

COLOR6 :LOCATE34.23:PRINT "FIRE": ELOCATE35 ,24:PRINT "BUG"・ 

GOSUB 1269 

ん 誤 愛生 生き こさ そこ AME ST 人 AE1 ニニ ニニ ニニ ニニ ニニ 

Sa MAIN MOUVE Gt3 。 ーー ニー ニー ニー ニー ニー 

A=INP(9):B=INP(1) 

IF INP(5) く >254 THEN SW=9 

IF A=191 THEN IF MX く <29 THEN MX=MX+1:GOTO 669 

IF A=239 THEN IF MX>9 THEN MX=MX-1:GOTO 668 

IF A=251 THEN IF MY<24 THEN MY=MY+1:GOTO 669 

IF B=254 THEN IF MY>9 THEN MY=MY-1:GOTO 669 

GOTO 749 

P=PEEK( &HF392+1MXX2+MYx120) 

IF P=&HEC THEN GOTO 1229 

IF MAN=&HEB THEN IF P<&H56 THEN IF P>&H41 THEN GOTO 899 

IF P=&HE9 THEN IF BOM=9 THEN BEEP1 :MAN=&HEB: BOM= 1 : BEEP9 

IF P=&HA5 OR P=&HEA THEN LOCATE XM、YM:PRINT" "5 EGOSUB1169:IF MNO<=9 THEN829E 
959 


人 デー ミン ケ 自伝 説 ツ クリ スタ ル ソ フ ト (会 06-326-8150) PC-8801,mk II へ 5 インチ ディ スク Y\6.800 欠 赤 き 王 と 青き 王 を 見 つけ 出 レ 
の )、 ッ た / 及 万 ある い は 2 人 と も 殺す か 、 助 ける か …… ゲ ー ム エン ド は な ん と 通り も ある 。 


の 


に JINHNJdD 深 


j 悦 omm ら AN は へ て G+ SL HoH9t 2 み dBH の 違 王 と HN' 慎 


いい 


まで 当 び へ 


JWN 【 1 


FIRE BUG リス ト 続 き 


ピル / 


710 IF P=&H2A THEN IF INP(5)=251 THEN COLOR4 :LOCATE MX,MY:PRINT "+"::AA=USR33( ) : 
LOCATE MX,MY:PRINT " ": 

729 IF P く <>&H29 THEN MX=XM:MY=YM 

739 LOCATE XM、YM:PRINT " "の : 

749 IF SW<>1 THEN IF INP(5)=254 THEN SW=1:SX=MX+(A=191)-(A=191)*(MX く = り )-(A=239) : 
っ Y=MY+(A=251 ) -(A=251 )x(MY<=9 ) -(B=254):IF PEEK(&HF392+SXx2+SYx129)=&H29 THEN LOCA 
TESX,SY:COLOR7 :PRINT "%"::AA=USR4(9 ) 

759 COLOR6 :LOCATEMX 、MY : PRINTCHR$(MAN) : : XM=MX : YM=MY : PORE&HE999 ,MX+1: POKE&HE991,MY 
769 IF BOM<>9 THEN IF TIME$<>T$ THEN GOTO 989 

779 IF INP(5) く <>254 THEN Sw=9 

789 '-- POLICE MOVE (マシ ンコ ^ サフ ルー チン ) - - 

799 TM=TM- 1: IFTM く =9THENTM=LEVEL : AA=USR9( 9 ) : IFPEEK( &HE994 )=1THEN GOSUB1169:IF MNO 
く =9 THEN GOTO 829 ELSE GOT0959 

809 GOTO 599 

G100 "ニーーーー ニ ニニ ーー GAME TS OVER ------ーーーー- 

9290 PRINT CHRS(12)::COLOR4 :LOCATE2,5:PRINT "xxxxxxX GAME OVER XXxXxXXX": 

839 IF SC>HS THEN HS=SC 

949 COLOR5:LOCATE 8,19:PRINT "YOU SCORE=" : SC 

859 COLOR6:LOCATE 8,12:PRINT "TOP SCORE=" :HS 

869 COLOR7:LOCATE 3.15:PRINT "PLAY AGAIN (HIT RETURN KEY!! ) ": 

979 IF INKEY$ く >CHR$( 13 ) THEN 879 ELSE 79 

86889 ”'--- 用? ス ワー ト ~ チェ ッ ク --- 

999 BEEP:FORI=1TO7:IF P=ASC(MID$("FIREBUG" , 【,1) ) THEN IF WCK=I THEN GOTO 919 

399 NEXT:GOTO 1249 

319 COLOR7:LOCATE33+ ( (WCK>4 )x-1+4x(WCK>4 ) )+WCK, 23+(-1x(WCK>4) ) :PRINT "-": 

92Z9 WCK=WCK+1:IF WCK>7 THEN OUT81 ,33:AA=USR5(9 ) :OUT81.32:FOR 1=1 TO 29:SC=SC+39 : 
AA=USR4(9):GOSUB 1269:NEXT 

939 GOTO 1249 

949 "ーーーーーーー ニ ーーー ALL RESET ----ーーー ニ ーー ニー 

959 GOSUB1269:AA=USR1 (9 ) :POKE&HE994,9:FOR 1=&HE995 TO &HE9A9:POKEI , 9 :NEXT 

969 GOSUB1459:GOTO 599@ 

97 人 9 "ーーーーーー ニ ーーー TIMER _ MOVE ------ ニ ーーー 

389 FOR I=1 TO BOM:BEEP1 :LOCATE 31,YB:PRINT " "::YB=YB+ 1 :T$=TIME$: BEEP9 

999 IF YB=>25 THEN GOTO 1999 ELSE NEXT:GOTO 799 

1999 IF BOM=2 THEN GOTO 1939 

1919 IF BOM<>1 THEN GOTO 7986 

1929 GOSUB1169:IFMNO=9THEN GOTO 829 ELSE GOTO959 

1939 FOR 1I=9 TO 2:LINE(BX+I+1 ,BY+1 )-(BX-1-1,BY-1) "XX"、RND( 1)x7+1,B 

1949 FOR K=9 TO 39:BEEP1 : BEEP9 : NEXT 

1959 IF PEEK(&HF392+MXx2+MYx129)=&HF9 THEN GOSUB 1169:P=1 

1969 AA=USR6(9) :NEXT:FOR I=2 TO 9 STEP- 1 

1979 FOR J=9 TO 8:NEXT:LINE(BX+I+1 ,BY+])-(BX-1I-1,BY-1)," "5,B:NEXT 

1989 LINE(BX+2。BY)-(BX-2,BY) ,""。2:LINE(BX+3,BY+1 ) -(BX-3。BY-1 ) 。"H"。3。B 

1999 HOUSE=HOUSE+ 1 : SC=SC+39 : GOSUB1269 : BOM=9 : YB=9 :MAN=&HE8 :LINE(31 .9)-(31,24 ) 。" 硬 " 
>2:IF MNO=9 THEN GOTO 829 

1199 "ーーーーーーー ニ ーー PAGE 1UP -----ーー ニ ーーー 

1119 IF HOUSE く >29 THEN IF P=1 THEN P=9:GOTO 959 ELSE GOTO 799 

1129 LVK=LVK+ 1 :PAGE=PAGE+ 1 : AA=USR5( 9 ) 

1139 IF LVK=11 THEN LVK=1:FORI=1TO04:OUT81 ,33:AA=USR3( 9 ) : AA=USR2( 9 ) : OUT81 .32:AA=U 
SR4(9) : NEXT 

1149 PRINT CHR$(12)::J=9:FORI=1TO MNOx19:J=J+19:COLORRND( 1 )x6+1:LOCATE13.12:PRIN 
TP BONUS ="jiJ:AA=USR4(9) : NEXT : SC=SC+J:FORI =1TO1999:NEXT :MNO=MNO+2:GOTO 399 

1159 "ーーーーーー ニ ーー ニーー MAN DEAD --ー-ー-ーーーー ニ ーー ニー 

1169 FOR 1=1 TO 19:COLOR3:LOCATE MX,MY:PRINT "XX"::AA=USR3( 9 ) :FORJ=1 TO 49:NEXT 
1179 COLOR2:LOCATE MX,MY:PRINT " 十 "::AA=USR2(9) :FOR J=1TO39 : NEXT : NEXT 

1189 LOCATE MX。MY:PRINT " "::MNO=MNO- 1 :MX= 14:MY=12:XM=14:YM=12 

1199 MAN=&HE8:IF BOM く >2 THEN BOM=9:YB=9:LINE(31.9)-(31,24) ," 画 ",2 

1299 RETURN 

2 こっ こっ やら テー の BOMB SE ーー ニー ニー ニー ニー 

1229 IF MAN く >&HEB THEN MX=XM:MY=YM:GOTO 739 

1239 IF WCK>1 THEN WCK=69 

1249 BEEP1:MAN=&HE8:COLOR2:LOCATE MX,MY:PRINT "O"::BEEP9 

1259 BOM=2:BX=MX: BY=MY :MX=XM:MY=YM:GOTO 739 

1269 COLOR7:LOCATE34,5:PRINT "HSC. "iLOCATE33 、 6 :PRINTUS ING" 本 持 提 圭 #":HS 

1279 LOCATE35.8:PRINT "SC. "ij:LOCATE33 , 9: PRINTUSING " 杜 持 # 壮 " 1SC 

1289 LOCATE35、13:PRINT "MAN"i:LOCATE35 ,15:PRINTUSING"# 半 " : MNO 

1299 LOCATE34,17:PRINT "PAGE"i:LOCATE35 , 19 :PRINTUS1NG"#":PAGE : RETURN 

1399 '--- 力 ~ メ ン セ ッ テ イ DATA --- 

1319 RESTORE 1339:FOR I=1 TO 19:FOR J=1 TO 39:READ A:DC(I,J)=A:NEXT : NEXT 

1329 RESTORE 1439:FOR I=1 TO 19:READ A:D(I)=A:NEXT:RETURN 

9 DAIA 3916.1J3.5、23.1 27 8.24.4.95。4.9、1、4.8.4.12.5.11 2 1.5.96.2.6.2.9 
4 DATA 115.1、). 259.4 人 10.4 2704、1 6 1、4.8.4、3.4.3 1 22 6.28.14.2。2.6、2.2 
5 は DATA 0 20 9 の 361 12) 。) 9 5 3054.6.36.4.3.5.242 1。27 2.4.422.1.14.6 
59 DATA 140.6)4 111160.1 19 . 15.9。5、1 6.5、5.98 2.29。2 う 2 2.24、2.25.5.27 6 
27 に DATA 99 2200.4 8、2.0202 グ 60626.2.5.2 41 9 17 4 1。16。8)】 1。4.8.6。393。4 


よっ 。12。4。 
>14.2.4.2.6, 


POULICE プー コチ 0UR ブラ 5EY 


RESTORE 1489:FOR 1I=9 TO 11:FOR J=9 TO 5 
READ 
FOR 

DATA 
DATA 
DATA 
DATA 


D$:D=VAL("&H"+D$) :POKE &HE995+J+Ix12.D:NEXT : NEXT 

1=9 TO 11:POKE &HE919+Ix12.9:NEXT:RETURN 
96.91.96.91.99.91.18.18,18.18.99,FF,1E,99.1E,99.FF,90 
EE。31.1E,、11 FEF、00、0C.18.0C.180.00.FF、1E。01 1E。91 。09.01 
91.9D,91.9D,91.99.91.905.91.95,91.99,91.15.91,15,91.,00 
2s MR 12 1 0 1 1E、01 IRM0) EPJ0U0、1D.19、(.1S。PF.00 
POLICE MOVE PRG、 (マッ ンコ ゴ ^) 


RESTORE1549:FORI=&HD999TO&HD285:READD も ED=VAL("&H"+D$):POKEI,D:NEXT: RETURN 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DD,。21 905.E0、3A,.02.E0 .32.93.E0、DD,7E,0B.FE, 909、28.96.3D,DD, 77 、0B,18,26 
CD。A3、D0.3E、00、BC、26 61 BDD 20、SE、3EF,1F、BC.20.59.3B、14.BD,209.54.CD。F3 
09.7E。 FE, EB、29 69.FE、E6。20.65. ド FE。20 04、09.D0:DD,66.、02 DD,6E。、08.CD、F3 
93.36.29.DD,66、99.DD,6E,91.3E.EA,32.FF,DF,3E,28,CD,86,D1 ,DD,66,99,DD 
6E,91,DD,74.92.DD,75,93.18.52.CD,16,D1 ,3A.94.E9 ,FE,91,C8,11.9C,99,DD 
19.3A、93.E9.3D、32.93,E9,FE,99,C8.18,8A,CD,89.D9,CD,A3,D9 ,C3,3D,D9 , DD 
7E,94、ED、44.DD,77.94.DD,7E、95.ED, 44.DD.77.95,CD,28,D2,C9 3E,91 .32.,94 
E9、C9.DD.7E,94.DD,86,99.DD,77.99.67,DD,7E,95.DD,86,91.DD,77,91,6F,C9 
DD,7E.98.FE、90,20.A/,DD,66,.99.DD、6E.91 .DD.74.06.DD,75.97,3A,99,E9,.DD 
BE.99、28,29.3A、91、E9.DD,BE.91.C2.66,D9 ,DD,36 , 9A.99,3A,99,E9、DD, BE , 90 
39.96.DD,36,99,FF、18.94.DD,36.99,.91.DD,36.98.91、CD,27,.D1 ,C3,69,D@,DD 
36.99.99、3A,91 、E9,DD,BE、91.28.95.38,96,DD,36,9A,91 ,18.E2,DD, 36 , 9A.FF 
18.DC,DD,7E,98.FE,99,C8.DD.66,.96,.DD,6E.97,CD、F3,93,36.29,DD, 7E,99,DD 
86.96,DD,77,96、67、DD、7E、9A,DD.86,97、DD,77.97,6F,3E、99、BC、28 .37 ,BD, 28 
き 人 9 反 -1E2 BC し 。 2 が 。2E、3E。1A BD、258.24.60D.ES.09.7E.FE、B9.28、1D、PE、BB。28.19 
FE。2A,29、1F,FE。20.20.16.3E、A5、32,EF,DF.DD、66.06。DD、6E, 97 ,3E,E8.,CD。86 
DIC9.3B.01.32.94。B0.DD,36.08.90、C9.36、20.21 。80.D2.CD ,F09.D1 ,19,F1 、B5 
に DPO 0 1 CODESN 03.8A、NEODE 77 09.、21。01 0 06 20.C5.06。19 り BS CD。FS 
903. /E。PE2EA.CC、 BBS .D1 FE、A5。(( BB5、D1 126 10.BD、 し 1 、2B.01 、24 .19.4.GC9 
36,29.C9.3A、92.E9,47 DD,21.95,E9,DD,66,.92,DD,6E,93,CD、F3.93,7E、FE,F9 
20.04. DD、96.08。15、11.WC 00.DD 19、10 9 の 0.20.02。19。0D、21.34.D2.19 
な っ 2 ト 。 す 0 っ D019299.2 ル 4.44.02、CD、FO0.U) (9.5E、ES、CD. MD DI1、ML、20、)P。PE 

し 9.19. す AE、0E、40、BB,、20.16.06.20 57 21.90.01、ED。41.CD.1D.D2.B5D。79.C 
ID。D2.B/, ED、52.30)F1.C9、1C。47 18.E8S.。D5,16.96.15、20、PD。ID、20.P8)D1、C 
19,95,.29.95.39,05、49,95,59.05.99,99.99.95,A9.9A.99,95,B9,19,C9、19, 
99.91、FF、90,99.19.39.29,39.39.39,49.39.59.39,69.39.79、39.89.39 .99. コ 
AD、39.B9.39,C9.39.D9 .39.E9,39,F9,39,E9.3 り 9,.D9.39.C9.39、B9,39,A9、39.90 
39、89.39。79、39.69、39、59、39 .49.39、39,39 ,29.39.19.3 り 9,.99、99、FF、95.59,95 
99、09 


の だ ZIA7 
の と /7 だ すず 也 


レゴ 4 2/2/- ら ん / 


画 変 数 リス ト ・ 20 一 80 初期 設定 ・ 810-870 ゲー ム オ ー バ ー 処 理 ・ 10 面 フリ アタ す る の は 、 な ガ な が 
D0……-10 面 分 の ゲー ムレ ベル ・ 90-260 デモ 表示 ・ 880-930 パス ワー ド を チェ ッ : 至難 の 技 。 ゲ ー ム の 必勝 法 と し 
DO ツ 10 回 分 の 区 、 プ ロロ に の 0 に 9206 ゲー ムペ ベル 規 3 の ・ て は 、 洗 面 ご と に 爆破 する 手順 
ッ ク の 位置 デー ツ  ・ 330-560 工場 ・ ブ ロッ フ ・ ス ・ 940-960 画面 クリ ア ・ や 逃げ 道 を 考え て 、 確 実に 、/ パ 
回 生 ne PS 6 コア 等 の 表示 。 9/U221000 イイ マー を カウ ラン ・ テー に を 取 つ くし いく ここ で す 9。 
SOC…… ス コア ・ 570-650 キー 入力 ト す る ・ MAN の 数 を 増やす に は 80 行 
YB…… タイマー カウンタ 用 Y ・ 660-680 爆弾 セッ ント ポイ ント : 1020-1090 工場 爆発 処理 " ・ MNO=6 の ガ わ り に 、 入 れ だ 
座標 か ・ 1100-1140 1 面 フ リア 処理 ・ い 人 数 を 入力 し て ください 。 ま 
BOM…' 爆 弾 セ ント の フラ グ ・ 690 火 つ け 場 か ・ 1150-1200 MAN が 死ん だ と ・ だ 、 画 面 を か え だ い 場合 に は 、 
MAN……MAN の キャ ラク ・ 700 ポリ スマ ン 、 弾 に じ あ ・ き の 処 理 ・ 画面 設定 デー タ が 1330 行 一 1420 
MNO……:MAN の 数 5 大 の 局 の の ・ 1210 一 1250 爆弾 セッ ト ・ 行 に 入 つ で いる の で 、 その デー 
LVK…… バ 現在 の ゲー ムレ ベル : 710 石 を 消す ・ 1260-1290 スコ ア 等 の 表示 ・ 中 の 2 ケタ の デー タ (40 の 位 
PAGE…… 面 数 ・720 何 か に あ た だ つ だ か : 1300 一 1430 画面 設定 用 デー タ ・ が 工場 パ ツ ー ン ナン バー, 1 の 
MX,MY……MAN の 座標 ":730 MAN を 消す ・ 14401510 位置 デー タ ・ 位 が パス ワー ドナ ン バ ー で FIR 
XM. YM……MAN の 旧 座 標 :740 石 を 表示 ・ 1520-1830 ポリ スマ ン 、 各 サ : EBUG に 1 一 7 で 対応 ) を 、 敵 
HOUSE-…… 爆 発し 工場 の 数 ・ 750 MAN 表 示 ・MAN の : ブル ー チ ンプ ログ : 当 に 、 か えて みて こく ださい 。 面 
WOKoosJA2 人 用 の ウツ XY 座標 を マシ ン 語 ・ ラム の 読み 込み ・ 数 を 増やす に は 1130 行 と 画面 設 
タ サブ ルー チン に 送る : (マシ ン 語 プロ グ ・ 定 デ ー タ 、 ポリ スレ ベル (1440 
LEVEL,TM…… プ ロ 、 アマ : 760 爆弾 セッ ト ガ され て : ラム ) ・ 行 ) を 変更 。 だ だ し 、 ブ ロッ フク 
の フラ グ ブ  ・ いる か ゃ ・ 弄 チエ ッ フ ポイ ント ・ と 火 つ け 場 が つね に 10 個 で ある 
SW……[X キ 一 が は な され だ か ・ 770 X キ ー が は な され だ : 設定 面 数 は 、 全 部 で 10 面 だ そ ・ よう に する こと 。 バ ッ チリ 賞 。 

の フラ ブ か ・ う で す 。 1 面 フ リア ご と に 、M : 

田 プ ロブ ラム の 説明 ・ 780 一 800 ポリ スマ ン 移 動  ・ AN が 2 人 プラ ス さ れ ま す が 、 ・ 


ジル 


人 疫 
7 ダー : 


0 に な っ た だ とき 6 ゲ ー ム オー バー だ 。 
TIME は 表示 る れ て いな いけ れ ど 、 終 
[214I6I8I で 上 下 左 右 に 移動 し て 、 お わり 近く に な る と Beep 音 が 鳴る の で 
金 を ひろ い 集め よう 。 お 人 金 は 全部 ひろ 注意 。 


有 えば 、 ち ょ うと 借金 の 金額 と 同じ で 、 と きど き 立 て られ て いる STOP の 看 
ペン 衝 び 方 0 科 作 人 0 3 寺 お 板 は 通行 禁止 。 NN 0 
沈 が 返せ る の だ 。 お 人 金 を 返し だ ら 1 面 ん は それ も 乗り こえ て 追っ て くる ぞ 。 
うう っ 、 地獄 の サラ 金 ゲ ー ム じゃ 。 2 参 考 「 マ イコ ン BASIC マ ガ ジ ン 」 


ふと し だ た こと か ら サ ラ 金 に 手 を 出し だ た だ し 、 お 人 金 を 全部 ひろ いき れ な い 84・8、『COMMUNICATION」 
て し まっ だ キミ は 、 あ れ よ あれ よ と い うち に サラ 金 の お 
うま に ば う 大 な 借金 を 作っ て し まっ た 。 っ さん に つか まる 


そん な と き 、 道 の あちこち に お 札 が 落 。 上 、 お 全 が か えせ 人 
ち て いる の を 見 つけ た の だ 。 サ ラ 人 金 に 。 ず に ゲー ム オ ー バ * 
手 を 出す な ん て よく な いこ と だ が 、 落 ー が 。 合 
ち て いる お 和 金 を ネコ ババ する の は も っ お まわ りさ ん に 側 
と わる い 。 と は 知り つつ も これ て 借金 見 つか っ て も (Y しい | 
を か え そ うと キミ は 必死 に お 札 を ひろ 庫 標 が あっ た だ け 半生 | 人 ひか 
まわ りさ ん が 、 を その 角 か ら は サラ 人 金 の に な る )、 ゲ ー ム オ 葉 。 吐 議 れ っ | っ の の ひひ の 必 
お っ さん か が *…… キミ の 運命 や いか に 。 ー バ ー。 TIME が 、 人 ひ 


ヽ ミ 』ー | 
< 行き どまり ま こら の ら は ポ ボワ ス 、 
で 追い こま れ 、 下 ガ ら は サラ 人 金 。 絶 
体 絶命 / 


人 ひひ の mm 仙人 の 還 人 の の の 合 人 の 合 
の の の 人 の の 命 の ひひ の の 


ひ の 合 人 仙人 の 仙人 鉛 合 人 の 合 合 人 人 の 合 人 の 人 の 


EE 宇 呈 生生 生生 生 呈 】 


19 WIDTH49.25:CONSOLE 9,.25,.09,1 

29 CMD SCREEN 2.9.7:CMD CLS 3 

39 DEFINT A-Z:0=5 

49 DIM MO%X(29) ,TE%(49),GIX(49) 、OM%(49 ) ,IE%(49) ,STX( 40 ) 

59 GOTO 316 

69 X=32:Y=16:TX=272:TY=169:OX=272:M=9:TI=100 

7 ' 還 還 較 遼 騰 角 還 テイ ク クン 還 語 生生 騰 千 半 

89 I9=INP(9):I1=INP(1):IF 1I9< く >255 AND 11 く >255 THEN 179 

99 X1=((I9=191)x(STATUSPOINT(X+17,Y+6) く >1 )-([I9=239)*(STATUSPOINT(X-15,Y+6) く >1 ) )※ 


199 Yl=((I9=251)%(STATUSPOINT(X+1。Y+22) く >1)-(I1=254)x(STATUSPOINT(X+1.Y-9) く >1 ) )※ 
16 

119 CMD LINE(X,Y)-(X+15.Y+15) ,9,BF 

129 X=X+X1:Y=Y+Y1:IF STATUSPOINT(X,Y+8)=3 THEN FOR I=1 TO 29:BEEPIMOD2:NEXT 1I:M= 
M+1:CMD LINE(X,Y+8)-(X+15.Y+15),9、BF:F=1:SC=SC+ 1 99 

139 CMD PUT@(X.Y),GI% 

149 IF F=1 THEN IF X=OX THEN WIDTH 49:FOR I=16 TO Y-16 STEP 16:CMD PUT@Q(X,1) OM% 
・FOR P=1 TO 59:BEEP PMOD2:NEXT _P:CMD LINE(X,I)-(X+15。I+15),9,.BF:NEXT 1I:CMD PUT@( 
X。1-16) ,OM%:LOCATE6 ,19:COLOR5 :PRINT "オカ ネ ブ ヒラ ッ タ ラ コウ ハー ン ニ トト に サヨ ウ 1 "EGOTO 779 

159 F=9@ 

169 ' 画 還 張 簡 租 朋 間 サフ キン ノ オッ サン 生還 且 和 生生 硬 還 

179 IF RND( 1 )x19< く 0 THEN 249 

189 X2=((X>TX)\(STATUSPOINT(TX+29,TY+T3) く >1)-(X く TX)%※(STATUSPOINT(TX-12.TY+3) く >1 ) ) 


199 Y2=9:IF X2=9 THEN Y2=((Y>TY)x(STATUSPOINT(TX+4.TY+19) く >1)-(Y く <TY)x(STATUSPOIN 
T(TX+4,TY-13) く >1 ) )x16 

299 IF STATUSPOINT (TX+X2+1 .TY+Y2+15)=2 THEN X2=2XX2:Y2=2xY2 

219 CMD LINE(TX,TY)-(TX+15,TY+15) 9,BF:IF PO0=1 THEN CMD PUT@(TX,TY+8),MO%:PO=9 
229 IF STATUSPOINT(TX+X2.TY+Y2+8)=3 THEN PO=1:CMD LINE(TX+X2、TY+Y2+8)-(TX+X2+15, 
TY+Y2+15).9,BF 

239 TX=TX+X2:TY=TY+Y2:CMD PUT@(TX,TY) TE% 

249 IF X=TX AND Y=TY THEN IF M<19 THEN 749 ELSE 820 

25  ' 還 且 各 各 騰 科 妖 間 オマ リリ) 陳 語 講 且 用 重 各 間 

269 X3=(INT(RND(1)x3-1))x16:IF STATUSPOINT(OX+X3+1 22)=1 THEN X3=-X3 

279 CMD LINE(OX.16)-(OX+15.31).9,BF:OX=OX+X3:CMD PUT@(OX,16 ) ,OM% 

289 TI=TI-1:IF TI<=9 THEN BEEP:BEEP:WIDTH 49:LOCATE 19.19:COLOR5:PRINT "キケン が 
キレ タ !1 "EGOTO 779 

299 IF TI<29 THEN BEEP 1:BEEP 9 


399 GOTO 89 

KB/ 還 = 瞳 た 5 証 .。 」 

329 OUT 81.9 

339 FOR I=9 TO 17:READ MO%(I):NEXT 

349 FOR Ii=9 TO 33:READ TE%(T):NEXT 

359 FOR I=9 TO 33:READ GIX(I):NEXT 

369 FOR Il=9 TO 33:READ OM%( 1):NEXT 

379 FOR I=9 TO 33:READ IE%( 1):NEXT 

389 FOR I=9 TO 33:READ ST%(I):NEXT 

399 COLOR 2 

499 PRINT 部 還 還 還 日 較 間 前 聞 間 間 間 間 間 間 昌 昌 間 間 間 間 日 間 間 是 間 " 
419 PRINT " 回 還 昌 回 較 較 回 較 | 較 還 胃 四 胃 上 " 
429 PRINT " 加 。 還 間 間 時 細 間 間 間 間 間 間 間 還 因 還 間 回 還 間 昌 昌 昌 間 間 昌 
439 PRINT " 回 回 虹 回 間 開 還 且 | 回 較 | 還 昌 | 還 昌 M 
449 PRINT " 回 還 韻 還 間 昌 軒 了 昌 昌 間 間 間 昌 回 還 間 昌 衣 間 昌 回 
459 LINE(9.12)-(38.12)." 三 "1ELINE(9.13)-(38.13) リー" 1ELINE(9.15)-(38.15) リー" 1 
469 LINE(9.18)-(38.18)。"ー"。1:LINE(9、24)-(38.24) "一 " 。1 


479 WIDTH 49 

489 COLOR 4:LOCATE 19.9:PRINT "HIT ANY KEY TO START !" 

499 IFINKEY$=" "THEN 499 

599 SC=9 

519 CMD CLS3:OUT 81,6 

529 FOR Y=9 TO 176 STEP176:FOR X=16 TO 288 STEP 16 

539 CMD PUT@(X.Y),IE%:NEXT X,Y 

549 FOR X=16 TO 288 STEP272:FOR Y=16 TO 169 STEP 16 

S59 CMD PUT@(X,Y),IE%:NEXT Y,X 

569 FOR I=48 TO 249 STEP48:FOR P=32 TO 128 STEP 48 

579 FOR X=1I TO I+16 STEP 16:FOR YsP TO P+16 STEP 16 

589 CMD PUT@(X.Y) ,IE%:NEXT Y.X.P,1 

599 FOR 1I=l1 TO 10 

699 MX(I)=INT(RND( 1 )*4)x48+89:MY(I)=INT(RND( 1 )x8 )x16+49 

619 FOR P=9 TO I-1:IF MX(P)=MX(I) AND MY(P)=MY(I) THEN 699 ELSE NEXT P 

629 CMD PUT@(MX(I),MY(I)),MO%:NEXT I 

639 FOR !I=1 TO 3 

649 SX=INT(RND(1)x4)x48+89:SY=INT(RND(1)x8)x16+489 

659 FOR P=1 TO 19:IF MX(P)=SX AND MY(P)=SY THEN 649 ELSE NEXT P 

669 CMD PUT@(SX,SY-8),ST%:NEXT I 

679 GOTO 66 

DS 介 DATA さる 8 よこ キ ゥ ニート 。 ニ 1 1011 771。19299.13107 13299.13107。1911 77 1 =1 、 テ 1 =1 =1 

690 DATA 32、16.16126.252.-256.255,-16384.3.-15616.195,-2S6 255。-19158 、-22434.-16 
479,-21762。-20566、-21766。-21846。-21846,-21854、-39938,-21774,-28758,-21774、-28758 
22991 ,29399,.21761.16469,.21595,16495.21525,21525 

799 DATA 32.16,5376.84.21769.85,21765,29565,-3328,297,-256,255.32513.16637,21765 
29565.21525 21589.21789.5205.21756 ,16213.21964.13141,-22916,170,-22914,-32598,。- 
22518,-24534、-24566,-24566,-3841,-241 

71 参 DATA 32.16.21921 ,16469 22176。149.21921 ,16469。-96.255、-3168.207 、-96.255 16368 
,252.22995.29565.21781 ,21525,21769,5461.21769.3861,21769,-12459.768,-16192,21766 
,85,21594.21 ,-22486,-22486 

729 DATA 32.16.256.64、1289,89.5376.84.21769.85,21761.16469.22277,29693.24341.217 
49.92533 21757。-235,21759,-233。-11609.31093.-3909.3987,、28725.3087.28725 ,-241 .2892 
1,-241.28917,-241.28917 

9B DATA 32.16.9. り 6.6 29, のり,。=1 。-] 。-1。-1、-1。-1、22487 22359,-8225.39583,-8233.22391 
8201 、32631 。-6233.32599、-1 。-1 ,-1 。-1.32 .2046.32.2048 、32、2048 

1/ 且 昌 | 還 0WOEE 較 | 

759 FOR 1!=1 TO 4:FOR P=3 TO 2 STEP -1:FOR Q=1 TO 59:BEEP QMODP : NEXTQ.P, 1 

769 WIDTH49:COLOR5 :LOCATE 19.19:PRINT "カネ カエ サン カイ コノ カ ~ キ !" 

779 FOR I=1 TO 3999:NEXT | 

789 CMD CLS 3 

799 LOCATE 19.7:COLOR 4:PRINT "L[ GAME OVER 11 "LOCATE 8,11:COLOR 2:PRINT "アナ タ ハ 

カリ タ カネ ブ カエ セナ カッ タ 。 " 

899 COLOR7:LOCATE12.15:PRINT "SCORE "5SC:LOCATE 19、18:COLOR 1:PRINT "REPLAY. . .AN 
Y _ KEY" 

819 IF INKEY$=" "THEN 819 ELSE 599 

829 WIDTH 49:FOR 1I=1 TO 39:BEEP IMOD3:NEXT:LOCATE 8.19:COLOR5 :PRINT "マイ ト ~ アリカ ~ トウ 
コナ サ ナイ マス ! "FOR 1=9 TO TIX19 STEP 5:COLOR4:LOCATE15.15:PRINT "BONUS ":1:BEEP 1:BE 
EP 9:NEXT 1:SC=SC+TIx19 

839 0=0-1:IF 0=9 THEN 0=1 

849 GOTO 519 


の と ど だ ZH ル 7 


し バイ // ゴメ ルコ ゴ 
還 変 数 リス ト 寺村 
MO%( ) …… お 金 の キヤ ラフ タツ 人 上 
の GET デ ー タ HH 
TE%() …… サ ラ 金 屋 の キヤ ラフ 上 還 四 
クタ の GET デ ー ツ 還 四 | 
GI%( ) … 自 分 の キヤ ラフ タ の 
GET デ ー タ HH 
OM%0 …… お まわ りさ ん の キ 
ヤラ フク ノダ の GE「 合 
デー タ Q 
児 6 で 家 の キ ヤラ ノダ の G 1 
ほ 上 た ーー QD 
ST「%( )…… 看 板 の キ ヤラ フン Le 
の GET デ ー タ We、 
GO…… 2 OS」 
XY アー…… 自分 の 座標 【/ 


上 T 多 TY…… サ ラ 多 屋 の 座標 
(OK お まわ りさ ん の X 厚 標 


X1.Y1…… 上 自分 の 進む 万 向 

XY グ …… サラ 例 屋 の 進む 万 
向 

F…… お 笠 を と つ だ か 

OS サラ 等 屋 の スピ ー ド 

PO…… サ ラ 和 金屋 の 下 に お 金 が 


MXO) で"" お 金 の XX 座標 

MI YU tt お 人 金 の Y 座 標 

ら 和 へ や Y…… 看板 の 座標 

田 プロ グラ ム 説 明 

10- 60 初期 設定 

70 て 130 自分 の 秒 動 

140-150 お まわ りさ ん に 見 つ 
0 つの や 

160-240 サラ 金屋 秘 動 

250-2/70 お まわ りさ ん 秘 動 

260-300 タイ ム 処 理 

310-ー360 キヤ ラク タデ ー タ 読 
み 込 み 

390<490 ダイ トル 

500 で 6/0 ズ スズ デ ー ジ 

660…/30 キャ ラク タダ デー タタ 

/40-610 _ END 処理 

620 一 640 面 ク リア 

田 チ エッ クボ イン ト 

キヤ フラ ノダ と ゲー ム の 設定 が 

な ガ な が ガ 。 サ ラ 和 釜 の お つ さ ん を 、 

うつ まぐ 引き つけ な が ら 、 金 を 取 

つて いく ぐ の が ボイン ト で す 。 時 

間 を 長 べ し だ い 場 合 は 、60 行 T 

|100 を ガ ひえ て ぐだ さい 。 娘 バッ 


チリ 沿 。 


ー ミ ング ^)、 ザ . プ ラッ ク バ ス ひ GA 夢 ニ ホッ ト ・ ビ ィ (会 03-360-3623) 〇 FM- 7 /8 /NEW 7・PC-8801.mkI 〇 5 イン チ デ ィ ス ク y7. の 
バッ ェ ッ ん / 800 @ 本 物 の 釣り 気分 が 楽し め る シミ ュ レ ーション ゲー ム 。 ポイ ント や ルアー を 選ん で プラ ッ フ バス 釣り が 楽し め る 。 


mW 


UM 
2 


mW 


mW pASIC 


マゾ ツン と する よう な スピ ー ド 
回 つの けけ て こる ⑨ 。 ワー ノ 
を 利用 し て 逃げ ろ / 


の TI TL WW 


隊 和 0 0 aw mi 1 HLLLLTITIITIITTETTYP 

- す く う カ ま の / ち 3 フ s 6 1 和 本 和 内 人 

び の だ 。 | 、 ます SR し RS 円 き = 革 間 装 培 半 業 科 交 
遊び < こ で 、 必 条 技 の 引 LT LLLELL 


和 基 


天 高 馬 肥 の ゆる 秋 な ん て いう と 思っ ワープ が 用 意 さ れ て 回生 CPPLLEEEEPLELEP IELLPP 
だ だ ろう 、 な ん て の も むか し よく あっ いる の だ 。 層 だ け 、 | Ne 
た 書き 出し だ けど 、 ま 、 要 する に ひ た 上 トト 左 右 の 壁 を 超え 


に 全 - 症 - 生 六 生 生生 


粗 着 


すら ドッ ト を 食べ る 、14 行 の 超 ネ ニ サ る と 反対 側 に 出現 す LULUULLLLLLULLLLILLL 
還 IEEE UM EMIUMEESEIMEESMEEEESSSSEE 
オス ンジ 昌 グ アイ 必 。 の の 600 さき ESNENEESH ME S ENG ES ES SEESEEESAS 


キミ が 操作 する キャ ラク タ は ^&/。 キミ は 1 面 全部 クリ Ci 
モン スタ ー( @) か ら 逃 げ て ドット を ど / ア て きる か な ? {6 
ん どん 食べ て いこ う 。 使う キー は 、 カ 
= ツー の み 。, 

が AA だ / ん で うだ り と 、 この が が ル が ん 
ヵ 難 し い 。 結構 ス ピー ド が ある し 、 な 
ん と いっ て も 、 敵 の アッ トマ ー ク カ が 異 


1 SCREEN2 ECONSOLE,,9.9:COLOR12IC 
LSEICOLOR1E 欠 =1:Y(1)=-1:X(7)=-1 

2 Y(5)=1:XX(3)=1:A=39:B=14:U=A:V= 
B:LINE(5,19)-(255,191) ,2,B:Y=1 

3 LOCATEX,YEPRINT" "2T=ESTICK( 0 ) 
4 欠 =XX+ 炎 ( 十 )・Y=Y+Y(T): ド R=(SCREEN(X, 


Y)=0): 火 =X-(XX= )※U+ (XX=31 ) ※U 

O Y=Y-(Y=9)X※V+(Y=15)xXV:LOCATEX ,Y 
・PRKINT"&"CHR$ も (R+8) :S=S-R 

7 LOCATEA,BIPRINT "AA=A+TSGN( XX-A 
):B=B+SGN(Y-B):LOCATEA,B:0=193 

G IFX=AANDY=BTHENCLS:PRINTS:END 

9 COLOR4:PRINT"@" ECOLOR1 EPRINTCH 
R$ も (11)S:PLAY"L64DEC" EGOTO3 M.S 


。 ぶ へ カ 円 く 


HB 選 和 き w 「 吾 | 


| 欄 」 肝 前 VNIYSVNNY ボ edC ミ い 
 。H き の 4(( 守 に NN ロ NIS 也 一 て き 


CT 人 寺 史 当 填 ③ 革 中 耳 画 仁 栓 。YJ 


_V 層 と で 仁 只 さ と と 0 ぎ NN 半 び の | 
| なび 靖 に 正 革 ピロ デ ヨー の の の ー の で 


男 変 数 リス ト ・R…… エ サ を 和食 べ だか (食べ だ : フ 敵 の 移 動 ・ な り 大 変 ど 。 こ の ゲー ム で は 、 

XY…… 自 分 の 座標 = ・8 GAME OVER 判定 : あと 2 行 分 の 奈 裕 が ある 。 行 
X( ).Y( )… 移 動 廊 向 ・S…… ス コア ・9 英 表 示 、 ス コア 表示 、 音 : に |= 1.9 行 を 10 行 に し て 、9 行 
AB-… 敵 の 座標 。  : 田 プ ロブ ラム の 説明 -・ 圧 チ ェ ツ ッ フ ポイ ント ・ に IF S=270*| THEN |=| 

U.V…… ワ ー プ に 利用 ・ 1-2 初期 設定 ・ 6001 は 、32X16 字 し か 納 ま ら : :GOTO 1 と すれ ば 、270 点 ご 

T「…… カ ー ソ ルキ ー の 値 ・ 9ー5 自分 の 移動 ・ な い の で 、 ゲ ー ム を 作る の は か : に 面 フ リア 。 災 ヨッ シャ 党 
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木星 調査 団 が 謎 の 異 星人 に 攻撃 を 受 
けた だ た 。 キ ミ は 4 機 の スペ ー ス シッ プ を 
あや つっ て 、 手 強い 敵 と 戦う の だ 。 

キミ の スペ ー ス シッ プ の 操作 法 は 、 
カー ソル ・ キ ー の に 所 で 左右 移動 、 ス 
ペー ス ・ キ ー で ビー ム 発 射 だ 。 ビーム / 
は 連射 が びき な い の で 、 慎 重 に 使っ た 


ほう が (いも A。 


敵 の 攻撃 は 3 段階 に 分 か れ て いる 。 


1. 大 型 ミ サイ ル 


し な が ら 道 を あけ な いと クリ ア は 難し 


Ks の だ 。 
3. 赤い 流星 


これ は ビー ム て 破壊 する こと すら で 
きだ いい 。 だ だ だ だ 、 カ ー ツ ル ・ キ ー で 
ょ け な が ら 進 む の み 。 

この 3 披 階 の 攻撃 を 繰り 返し な が ら 
敵 の 数 は 増え て い 〈。 高 得点 べ の 道 は 
が が な か キビ ジオ ぞ で 。 
^*. モ = リス ト 1 を 打ち こん だ ら 必 ず 
まず SAVE す る こと (RUN 
させ る と ブロ グラ ム が 壊れ る )、 そ し て 


いっ だ ん RUN さ る 
せ て か ら 、 リ スト 2 
を 打ち こも う 。 


この 攻撃 は 単調 だ か ら 、 慎 重 に 戦っ 


て いれ ば クリ ア す る の は か ん た ん 。 人 据 
力 ある 効果 音 が バッ ク に 流れ て いる け 


ど 、 敵 は チョ ロイ 。 
の 0 4 p al BE (| 

これ は 手強い ぞ 。 
左右 に ブル ブル と 
揺れ な が ら 攻 め て 
くる 随 石 群 は よ け 
る だ け で も だ い へ 
ん だ 。 効果 的 に ビ 
ー ム て 限 石 を 破壊 


一 変数 リス ト 
LIST 1 

New エラー 行 番号 
dip タウ 


M cuiees 面 数 
N 6 パタ ダーン 
AA…… 自 機 数 


この 面 は わり あ 
い ラ ク 。 せ い ぜ い 
敵 を や つつ け よ う 。 


な むけ お だ : 如 寿 5 放 BPREE ああ W は FUHTRRX 


・ P……USR 命 令 用 
・ 較 プ ロブ ラム の 説明 
。 LIST 1 


10- 80 マシ ン 語 DATA 読 
み 込み 
・ 90-960 マシ ン 語 DATA 
e 小生 2 
10- 40 初期 設定 


| ら 
| も 
| 新 
近 
ド い 
| 作 

gie| 
| を 
| と 
ん 
| と 
| ん 
人 
5 りり 
す 


QJ(( 生 四 デ ゴ 


ど 


AS は J ざ 落 へ す つ か の 中 和 きき 凌 
の 


_ VS の Qoo 。 半 


ヽ AV で コー ロン | 


の oo o- 〇 で こと こら 〇 の - 〇 で 幅 
。 叶 叶 ど へ と 度 き 大 S 計 当 膨 AS 


し eS 生 T へ 融 


な に 日 E( 旨 月 HH5 有 HH BPHEE Pr HB. FHTRBST 


4 隅 石 は 強い ぞ 。 攻撃 より も 防御 第 1 。 


50- 70 画面 作成 ・ 音 
0Zz000 イン ルー チン 


・ 110-140 や られ だ と き の 処 理 ・ 
: 990400 の ーー ツテ 
< 還 チ エッ ワ ボ ポイ シド 


マシ ン 語 使用 プロ グラ ム 、 な 


特に の 面 は クリ ア が 難し い 。 ま 
・ だ 、 ハ イス コア 表示 べく らい は ほ 


レ い 。 上 自分 の 数 は 、 LIST どの 


・ 20 行 の A の 値 だ か ら 、 す ご に 終 
・ わ つ て し まう 人 は 、 こ この 値 を 
・ 増やし まし よう 。 娘 バッ チリ 賞 。 
・ の で 動き は いい で すね 。 だ だ し : 

・ ミサ イル が 連発 で き な い の で 、 ・ 


マン Z 


溢 /009- つ プ @ 


DRNIN)aNNRII 


$S 民 息 光 へ 中 否 ロ om ロロ AJ ば へ ざこ wrtvt9t rd の 理 で HI 革 


ST 


ンダ 


PRINT' 
N=199:FORI=&HF909TO&HF56FSTEP1 6 
L=9:READA$ や ,B:FORT=9TO15 

M$=MID$ も (A$,T%2+1.2):P=VAL("&H"+M も や も):L=EL+P: IFEL>255THENL=L し - 256 
POKEI+TJPENEXT:IFB く >LTHENPRINT"?2SN Error in 
N=N+19:NEXT ' 
FORI =&HE499TO&HE49B:READA も :POKEI VAL("&H"+A$) :NEXT 
EXEC&HE499:PRINTTLOAD 1! "ENEW 
DATACSDSES1A3C4721A1D91197991919FDEB,215 


な り お まち く を "さい 


DATAE1CD1BD923D113C119E6C9E596971A77,163 
DATA13C591299999C119FS5E1C9D9EDSF4F3A,32 
DATA28FA814F9797813CD9C91181D92100E2 ,196 
DATA9629CD99D93AFDDAFE9A382AD69A32FD, 77 
DATADA3AFCDA3C32FCDAFE9A381AAF32FCDA, 63 
DATA3AFBDA3C32FBDAFE9A389BAF32FBDA3A, 1 41 
DATAFADA3C32FADA11FADA2196E29694C300 , 209 
DATAD99A9B9C9D9E1899999999991E1E191A,147 
DATA1B1CID1E1E9F191E9A17111213141516,99 
DATA1E999999999090999FCCCCCCCCCCCFC0C,39 
DATA9C9C9C9C9C9CFCCC9CFCC9C9FCFCCC9C,194 
DATA399CCCFCCCCCCCFC9C9C9CFCC9C9FC9C,12 
DATACCFCC9C9C9FCCCCCFCFC9C9C9C0C9C9C,220 
DATAFCCCCC39CCCCFCFCCCCCFC9C9C9CA888, 60 
DATA89A89888A8A88889898988A8A8888888,128 
DATA8888A8A98888A9888888A88989A88989,249 
DATAA8A9A9A9A88888A8888888A8292020A8,48 
DATA8989A9898089888888888888A8A82920 ,224 
DATA20292929298888A8888888A88889A888,208 
DATA88A8A82920202029A899999909992920,96 
DATA29299999992020544449549444545444.224 
DATA44544949491944445444444454444949,49 
DATA494454544949544949549999900990909,212 
DATA99CD2BD96F26E3C335D33A96DA47DD21 ,1096 
DATA91DBC5CD81D1DD7599DD7491DD23DD23,1099 
DATAC119EFC9CD2BD9E69F4FCD2BD9E69781 ,293 
DATA9EE381FEFA39ED67CD2BD96FC97E9E9C,134 
DATAA977C99632DD2197DACDA4D1DD7599DD,113 
DATA7491CDBDD1DD23DD2319EE219FF72200 , 23 
DATADA116BD3CD17D3AF3292DA32FEDACD81 , 245 
DATA397D3299DBFE912998118FD3CD8AD118,157 
DATA12FE92299811AFD3CD8AD1189611CFD3, 198 
DATACD8AD1CD61192A99DACB6FC4E1D2CB67,77 
DATAC4EDD2CB7FC4FBD2E52A99DA116BD3CD , 99 
DATA17D3969C111E997EA7C44FD3237EA7C4.66 
DATA4FD3237EA7C44FD31919ECE1116BD3CD , 98 
DATA17D32299DA9632DD2197DADD6E99DD66, 139 
DATA91CDBDD1 112099197CFEFACCA4D1CDBD , 229 
DATAD1DD7599DD7491DD23DD2319DE3E9AD3, 126 
DATAA9AFD3A1DD2191DB3A99DBFE912995CD, 163 
DATAEFD3189CFE922095CDS9D41893CD29DS , 226 
DATA3A92DAA7282F2A93DACDC5D2119991B7,72 
DATAED527CFEE338982293DACDC5D21816AF , 28 
DATA3292DA1819E511299906987E9E19A977 ,22 
DATA1919F8E1C93E9A969919FE3D29F9C313,83 
DATAD2F52B7DE61FFE1F2892F1C9F1F5237D, 251 
DATAE61FFE1E2892F1C9F118E6F53A92DAA7,166 
DATA2913E511FF99B7ED522293DACDC5D2E1 .98 
DATA3EFF3292DAF1C9E5969C4E1AA9772313,186 
DATA4E1AA97723134E1AA97713C5911E9999.,79 
DATAC119E7E1C9E5D596194E1AA97723134E,62 


"5 N:END 


の と だ ZHA7 
の と /7 だ 7 ア 


DATA1AA97713C5911F9999C119EDD1E1C9FE,114 
DATA9CC8E1E1212999C39B393E96D3A93E1F,139 
DATAD3A13E9AD3A93E9FD3A1C9993C99993C,49 
DATA99993C99993C99993C99C91493C95593,163 
DATAC15543C51453D55557C91493C9999382,34 
DATA98899888888888899892099209222920,158 
DATA292329939993999FC99399939993999A,75 
DATAA99AA92AA82AB8AABAAAAEAAAEAAAEAA, 20 
DATAAEAAAAAAAAAAAA2AA82AA89AA99AA991,163 
DATA49955994491554151411541544155495,151 
DATA4911541545145595519514915999403A,162 
DATA96DA47C5DD6E99DD6691118FD3CD35D3,195 
DATAE596193E19111F99BE282D23BE282919,215 
DATA19F6E1118999197CFEF82814118FD3CD , 127 
DATA35D3DD7599DD7491DD23DD23C119C4C9,19 
DATA118FD3CD81D118EA3AFDDA3C32FDDACD, 183 
DATA45D9E1CD5AD33A95DA3C3295DAFE9F29,131 
DATADFE1E1219999C39B39CD2BD9FE89D2B9 , 33 
DATAD43A96DA47C5DD6E99DD669111AFD3CD , 233 
DATA35D3E59619111F993E19BE282D23BE28 ,157/ 
DATA291919F6E1113F99197CFEF8281411AF,9 
DATAD3CD35D3DD7599DD7491DD23DD23C119,29 
DATAC4C911AFD3CD81D118EAE1CDFFD418F2 ,204 
DATA3A96DA47C5DD6E99DD669111AFD3CD35 , 7 4 
DATAD3E5111F993E199619BE282D23BE2829,145 
DATA1919F6E1114199197CFEF8281411AFD3,172 
DATACD35D3DD7599DD7491DD23DD23C119C4,14 
DATAC911AFD3CD81D118EAE1CDFFD418F23A,66 
DATAFDDA3C3C32FDDACD45D9CD5AD33A9SDA,77 
DATA3C3295DAFE9FC9E1E1E1219999C39B39,117 
DATA3A96DA47C5DD6E99DD6691 11CFD3CD3S , 196 
DATAD3119991197CFEF8281D11CFD3CD3SD3,61 
DATADD7599DD7491DD23DD23C119D73AFEDA ,94 
DATA3C289C32FEDAC911CFD3CD81D118E1E1 ,239 
DATA219999C39B3999999999999999999999,184 
DATA21.99,F9,11.909,D9,91 ,70,06,ed,b9,C9 


CLEAR 59,&HD999:POKE&HFAEB , &HC3:POKE&HFAEC , &HD 1 
M=1:N=1:A=3:CONSOLE , , , 9 

FOR I=&HDAFA TO &HDAFD:POKE 1I,9:NEXT 

POKE&HDA95 ,9:POKE&HDA96 , 4+M 

SCREEN 4.2.2:COLOR ,,2:CLS 

EXEC&HD93A:SOUND 7,24:SOUND 1.15:SOUND 9.245:S0UND 8,19 
SOUND 3,.15:SOUND 2.255:SOUND 9,19 

P=USR(N):IF P=&H29 THEN 119 

M=M+1:N=N+1:TF N=4 THEN N=1 


GOTO0 49 
FOR Il=15 TO 9 STEP -1:SOUND 7,55:SOUND 6,29:SOUND 8,1 


LINE(PEEK( &HDA99)*8,172)-(RND( 1 )x256 ,RND( 1 )%※192 ) , 
A=A-1:IF A=-1 THEN 159 

GO10 59 

LOCATE7.2:PRINTTGAME OVER 
LOCATE8.4:PRINT"HIT RETURN KEY“ 

EXEC&H10S58 

IF INKEY$ く >CHR$(13) THEN 189 

GOTO 20 


1 : NEXT 


ゲー ミン ミン グ ^)、 アレ ンジ ボー ル の PONYCA ニ ボニー (会 03-265-6377) PC-8801、mk TI の 5 イン チ デ ィ ス ク \4.800 テー プ \3.500 欠 バ 2 の 
AA ッ ル ん / チン コ と ピン ゴ を あわ せ だ アレ ンジ ボー ル の パソ コン 版 。 ふつ う の ア レン ジ ボ ー ー ル より も パチ ンコ に 近い 感じ 。 


溢 /009- つ ガ 


ら ず 、 敵 の 上 陸 を 3 回 許し て し まっ た 
ら キ ミ の 負け 。 

PC-6001 が 勝つ か 、 キ ミ が 勝つ か 。 
右 の 赤い グラ フ は 、 ノ ヤレ カン 砲 の カカ 適 確 な 判断 力 し スペ ー ス ・ キ ー の タイ 
の 強 る を 示し て いる 。 力 の 強い と き に ミン グ が 勝負 の 分 か れ 目 だ 。 
スペ ー ス ・ キ ー を 押す と 砲弾 は 遠く ま 文 参考 「PC-Techknow 6000」92 ペ 
で 飛び 、 逆 に 低い と き に 押す ー ン の ザウ ンド 。 

と 砲弾 は 近く に 落ち る よう に 

RUN る せる と 、 あ る 海岸 の 風景 が 出 な っ て いる 。 一 度 、 最 高 と 最 
て 〈 る 。 右 が キミ の 守る 要 寒 。 左 か ら 低 の と き を 試し て みて 、 ど 2 う 
や っ て くる の が 、 敵 の 上 陸 艇 だ 。 ス ペ いう 具合 か 確か め て お 〈 と 、 


ー ス ・ キ ー で ゲー ム ス タ ー ト 。 あと が や りや すい だ ろう ね 。 
上 陸 艇 は 前 後 し な が ら 、 キ ミ の 要 寒 左側 の 赤い グラ フ は 時 間 を 


に 上 陸 し よう と や っ て くる 。 を の 上 陸 表し て いて 、 一 定時 間 、 要 寒 
艇 目 が け て ノ ヤ レ カ ン 砲 を ヒッ トミ せる を 守り きれ ば キミ の 勝ち 。 
の が キミ の 使命 だ 。 夢 に 、 砲 ) 帰 が な か な か あ た 


や つた だ 。 時 間 い つば いも ち ょ は ずれ / 敵 に あて る の は 難し い ぞ 。 
こ だ え て パソ コン に 勝つ た ぞ 。 


1 NN 
HHtRHHH1GH 
BB NNN 
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NN へ NNN 
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NN 


人 
ク 
ボ 


い へ へ ヽ NN 
SS AA 
AN AA 
NN 
NN 


は ご 旨 さ 0x 帳 栄 回 


まま 
2 


み 


汗 さ へ 和 糸 S 回 ゆ 


1 提 
な は 


me 


SCREEN3,2.2:CONSOLE9,16,9.9:HI=9:GOTO679 
LINE(X1,.139)-(X1+15,143) ,2.BF:LINE(X1+7、149)-(X1+7,135) ,2,BF 


S0UND7,56:PLAY"V15c64964":X=4:U=U+1:LOCATE12+0, 11:COLOR4:PRINT "大 ": 


IFU=3THENLOCATE9 . 4:PRINT "PC-6991 八 アナ タニ カッ タ " ) : GOTO588 
RETURN 

Y=SGN( INT(RND( 1 )*5)-1)xX4:K=5:RETURN 
X1=X:T=T+9.3:PSET(T,174),.3 


IFT=>142THENLOCATE9 , 4:COLOR4:PRINT "アナ タ ハ PC-699 1 ニカ ッ タ "::GOTO589 


X=X+Y:K=K- 1 :IFX=9THENY=4:X=X+Y 

IFX=>189THENGOSUB20 

IFK=9THENGOSUB69 

LINE(X1.139)-(X1+15,143) 、1.BF:LINE(X1+7 149)-(X1+7。135) , 1 
LINE(X,139)-(X+15、143),2。BF:LINE(X+7 149)-(X+7,135) , 2 
IFC=1THEN3709 

L1=L: し =L+6:IFL=258THEN1 89 
LINE(L1,162)-(L,162).4:IFSTRIG(9)=1THENC= 1 : GOTO0299 
GOTO079 

LINE(192.162)-(252 .162) 3:L=192 

GOTO79 


SOUND7,7:SOUND6 , 31 :SOUND7 , 242:SOUND8 , 16 :SOUND1 1 , 9 : SOUND1 2 , 59 


SOUND1,19:SOUND13.9:SOUND7 , 9 
LINE(216.79)-(229.76),4:LINE(216,86 ) - ( 229 ,89 ) , 4 
LINE(224.//)-(228、78),1.B:LINE(240.77)-(244.78) , 4。B 
LINE(216.79)-{(229.76)。1:LINE(216、86 ) -(220 , 89 ) , 1 
LINE(224.77)-(228.78),4.B:LINE(249.77)-(244.78),1.B 
E=INT((L-192)/7)+1 

ONEGOTO0289 ,290,399,319,320 、330 , 349 , 359 , 369 
RESTORE999: READM,N:0=N- 1 :H=128:M=M+H:GOTO399 
RESTORE899:READM,N:O=N-1:H=112:M=M+H:GOTO0390 
RESTORE889:READM,N:O=N-1:H=96:M=M+H: GOTO0399 
RESTORE879:READM,N:O0=N-1:H=89:M=M+H:GOTO399 
RESTORE869:READM,N:O0=N-1:H=64:M=M+H:GOT0399 
RESTORE859:READM,N:O=N-1:H=48:M=M+H: GOTO0399 
RESTORE849:READM,N:O0=N-1:H=32:M=M+H:GOTO0399 
RESTORE839:READM,N:O0=N-1:H=16:M=M+H: GOT0399 
RESTORE820 :READM,N:O0=N- 1 :H=9:M=M+H:GOTO0396 
M1=M:N1=N:O1=0:READM, N:M=M+H:O0=N- 1 


SOUND7 ,244:SOUND6 , 31 :SOUND8 , 16:SOUND9, 9 : SOUND1 1 , 9 : SOUND1 2 , 255 


PSET(M1 ,N1 ) ,1:PSET(M1 ,01 ) , 1 
IFPOINT(M,N)=2THENV=4 :GOTO0439 


IFN=143THENV=3:SOUND6,19:SOUND7,246:SOUND12.29:SOUND13.09:GOT0499 


PSET(M,N) ,4:PSET(M,0) ,4:GOTO79 

S0UND7 ,7:SOUND6 , 15:SOUND8,16:SOUND9,16:SOUND19,16 
SO0UND12.99:SOUND13,9 

LINE(X,139)-(X+15.143),.4.BP 

ら S=S+19:LINE(144.9)-(199,11),1,BF 

LOCATE8.9:COLOR4:PRINTS: 
LINE(X,139)-(X+15.143),1.BF:LINE(X+7.149)-(X+7.135) ,1:X=4 
LINE(M,N)-(M-8,N-19) ,V:LINE(M,N)-(M-4,N-14) ,V 
LINE(M,N)-(M+4.N-14),VELINE(M,N)-(M+8,N-19) ,V 
LINE(M-8,N-19)-(M,N) ,1:LINE(M-4,N-14)-(M,N) , 1 


LINE(M+4.N-14)-(M,N),1:LINE(M+8,N-19 ) - (M,N) , 1 
FORA=1TO5 

LINE(M+(A-9) ,N+A)-(M+ABS(A-9) ,N+A) .V-2 
LINE(M+(A-9) ,N+A)-(M+ABS(A-9 ) , N+A ) , 3 

NEXT 

C=9:GOTO180 


FORA=9TO039:PRINTCHR$S( 7 )::NEXT 

IFS>HITHENHI =S 
LOCATE9,2:COLOR4:PRINT"HISCORE "HI: 
LOCATE3.6:COLOR2EPRINT "GAME OVER"* 
LOCATE3.8:PRINT "REPLAY く y>" バ 
IFINKEY$ く >" "THEN639 

IFINKEY$="n "THENSCREEN1 1.1:CONSOLE,」 1.1:CLS:END 
IFINKEY$="y"THEN679 

GOTO649 
L=192:D=1:C=9:S=9:T=9:Y=4:K=5:U=9 

COLOR1 :CLS 

LINE(9,144)-(254.199) ,3,BF 
LINE(192,.84)-(254,.143) ,2.BF 
LINE(222.84)-(192.138),1:PAINT(294.198),1,1 
LOCATE14.6:COLOR4:PRINT" イ "< 

LINE(238,78) -(238,83) 

LOCATE9 ,14:COLOR2:PRINT" タ イム" 5 ELOCATE9,13:PRINT "チカ ラ "【 ECOLOR4 
LOCATE2.9:PRINT "SCORE" ELINE(9,174)-(142。174) 
X=4 
LINEIX、199)-(XT15,.143).2.BP:LINE(X+7 、140 )-(XfY 135 ) ,2 BE 
LINE(48.69)-(296,71 ) , 1 ,BF 

IFSTRIG(9)=1THEN709 

LUCATIES、S)PREINT PUSH SPACE"j 

GOTO789 

DATA216,78 

DATA200,78 

DATA184,78 

DATA168,78 

DATA152.78 

DATA136,78 

DATA120,78 

DATA194,78 

DATA88,78 


DATA89,79.72.82.64.84.56.88,.48.92。.49,199.32,115,24,139,16,143 


プー ミソ 


の だ ZH ル 7 
の と /7 三 アア 


一 変数 リス ト 
Ne iRais の 和 間 
HI…… ハ イス コア 


に チカ ラウ ラン 時 栓 
C…… リ リル カン 人 砲 発射 フラ ブ 
T…… タ イム グラ フ X 座 標 
Y…… 上 陸 艇 の 移動 廊 向 
K…… 上 陸 艇 の 秘 動 回 数 
X…… 上 陸 艇 の X 座 標 

U……… 大 "の X 喉 標 

MIN…… 爺 弾 の XX,Y 座 標 
H…… 爺 弾 の XX 座標 調整 用 
V…… 水 柱 、 火 柱 の 色 


田 プロ ブラ 
10 
2 っ 00 
60・110 


70 一 190 
0 


60 

90 
100 
120・130 
140 
150 一 190 


200 一 250 
260 一 360 


370 一 420 
430 一 460 


490-570 


580660 
6/0~610 
820-910 
弄 チ ェ ン フン 
慣 れ な い 
当て る の は 
れ ば 得点 が 


ム の 説明 

画面 設定 

上 陸 有 艇 の 上 陸 処 理 

上 陸 艇 の 左右 の 動き 

決定 

イッ ルル レー ノ 
ダイ ム 用 グラ フ を 
消し て 行こ 
勝つ だ が か 判定 
上 陸 艇 の 動き 決定 
上 陸 さ れ だ が 判断 
上 陸 艇 の 表示 


弾 の 秘 動 ルー チン へ 


パル カン 但 の チカ 
ウ ク ラ ッ ルー ガン 
パル カン 念 発射 
チカ ラグ ラフ に 対し 
て の 人 砲 弾 移動 距離 決 
定 
弾 の 秘 動 と 命中 判断 
上 陸 用 に あ だ つ だ 負 
理 
中 お よび ハズ レ 時 
の 着弾 処理 
ナー ュー リル 0 理 
画面 作り 
弾 追 デー タ 
ポイ ント 
うち は 、 敵 に 砲 弾 を 
難し い 。 距離 が 遠 け 
高い と いう の も いい 


と 思 つ 。460 行 の ら =S+10 を S 
三 G 二 (| 一 192) キネ ど ) と すれ 


ば いい 。 あ 


と 、60 行 の =SG 


NNT(RIND(4 )* ら 5)-1 )*4 の 
5 の 値 を 大 きぐ する と 、 上 陸 艇 の 


ほ つ が 強く 
い ガ 適当 ) 


な る 。 (3.5 ン ノ ぐ こら 
支 バ ッ チ リ 沿 。 


クラ ンス トン マナ ー 心 スタ ー ク ラフ ト (会 03-988-2988)PC-8801, mk II・FM- 7 や デ ィ ス ク \ 12.800 欠 フ ラ ンス トン 卿 が う 4 
ーッ た / 自分 の 屋敷 に 残し た 16 の 財宝 を 見 つけ 出す アド ベン チャ ー。 アッ プル カ ら の 秘 植 版 だ が こり わけ 評価 が 高い 。 


湊 /009- の つづ @ の 


oc 靖 呈 


WWWW 
WWWWW 
UM 

WW 


力 。 10 個 の 基本 動詞 は ファ ンク ショ ン 
・ キ ー に 設定 され て いる 。 

友 参 考 マイ クロ キャ ビン 「『 不 思 議 な 
国 の アリ ス 』 


ある ひ あな た は お その せ 衣 5 に ま よ っ て し まっ た 


そこ ご て で" は ご あな て が "みか あっ た 
この は 部 落と どこが に この あま " ゆ せ 起 導 
あや コ っ そい る る と こう が ある 3 お "た" 」 

あな た は た ちち あか" り その は "し ょ に むか つの て あっ た 


に の 


テキ スト タイ プ ブ の アド ベン チャ ー ゲ 
= 人 

ある 日 入り こん で し まっ た 謎 の 世界 。 
キミ は 、 6001 の 画面 に 出 て くる メッ セ 
ー ジ だ け を 頼り に この 謎 を 解き 、 も と 
の 世界 へ も どろ うと る ま よ い 歩 く の だ 。 
コマ ンド は 動詞 名 詞 を ひら が な で 入 


ふ へ VTV ッ | 
は さと 忌 渡 | 
貴石 ユー 
ト kJINHJ 


コマ ンド は が うし また 8 
ょ うし すめ nb を 9 ら が な で いる 


(な トー エ S「! と と 人 ル 
び 病 S((Sre し v さ は み は 


し さ グ HO の の ー の で . 注 MS 措 叶 」 


mm 
と ーー 


て 抱け いく ン み る / も と て る / みる は な お ン と きき は に な と 


ペー 
よ 
で ご 

デ 


ーーーー… こと は は え ⑭ まそ を て で て" す ーー ニーーー 
コイ ント テーー ツ 7 みる 


5 叶 拉 REmm gw WW 
4 まず ざ 、 「 み る 」 こ ご と か が ら は じ レ め よう 。 


。VPVM 計 トーV 2 ざき は 
Spuelsl S 009 009 VVM 4 みっ 


さと 豆粒 員 バ コーHS ホ で は みせ) 


さき Stw 記 澤 | 
へ と 還 避 癌 


画 交 数 リス ト ・ 一 チェッ フ ボ イン ト ・ まだ まだ 不 自然 な 部 分 が ある し : 打ち こむ と き に わか り に こぐ し 
較 プ ロブ ラム の 説明 ・。 アド ベン チャ ー ゲ ー ム で 、 絵 ・ 最後 の 詰め も 甘い で すね 。 ・ て ほし い 。 壇 バッ チリ 賞 。 
アド ベン チャ ヤー な の で 、 ひ み ・ が な い の は 残 意 だ が 、 な か な ガ ・ プロ プラム に つい て は 、 ア ド ・ 

5 「 ・ 楽し め る ゲー ム だ よ 。 だ だ し 、 ・ ベン チャ ー な の だ か ら 、 も っ と ・ 


REM ※※※※ 
REM ※※※ NAZO0 


BY KAJA 


CLS:CLEAR199:GOTO 1459 

DIMN$ も (7 ) ,C も (12) ,B も (7) ,M(7 ) 

FORIT=1TO7: READN$ も ( { ) ,B も (T):NEXT 

FORI=1TO12:READC$ も ( 1 ) :NEXT 
DATA は な 。 い え 0) まえ 。 は ^~ け うつ 。 い え 0 な か 。 は く 。 も り 。 え た ~ 。 も り の 0 の な か 。 く だ ~ も 0) 。 も り 。 ね とこ 。 い え 0) な か 。 ま っ ち 
DATA へ や の な か , み る , と る 。 はなす, うこ ~ か す 。 いく 。 も と ~ る 。 た だ か う 。 さけ ふ ~ 。 お る 。 か ける 。 わた す 。 つけ る 
ME も =CHR$ も (&HF9 )+CHR$ も ( &H9D )+CHR$ も ( &HDE ) 
FORI=1TO7:KEYI,C も (1)+" "ENEXTEB=1:BO=1:KEY8 "あけ る "EKEY9 "も ち も の 
REM xxXX Main 
PRINT 。 の は "BS も SCB) " て ^ す 
CM$ も =" "ETINPUT " コマ ント ~-- "5 CM も : IFCM も =" "THEN1 60 
A=1:11$=" "2T2 も ="" 
IFMID も (CM も ,A,1)=" "THENA=A-1:GOTO 209 
IFA く >LEN(CM$) THENA=A+ 1 :GOTO189 
LO0=9:T1$=LEFT も (CM も ,A) :12$=MID も (CM も ,A+T2):TFI2$=" "THENLO= 1 
AA=1 


の と /7 三 77 
229 IFI1$=C$(AA)THEN369 
239 AA=AA+1:IFAA く 13THEN229 
249 IFI1$=" あ ける "THEN279 
259 IFI1$=" も ち 5 もの "THEN329 
269 PRINTCHR も (7 ) 。」" 。。 + ュ + テキ マセ ン ユキ キキ "EGOTO 159 
279 IFB く >20RI2$ く >" と こ ぁ "THEN399 
289 IFKA=9THENPRINT "  x か まき ^ か ^ が かかっ て いる "EGOTO 159 
299 DO=1:GOTO889 TITIIII 
399 PRINT"  x ぁ ま きま せん !!":GOTO159 HHTTH 
319 REM xxx も ち も 0 TTTL 
329 PRINT"  "::IF ME=1 THEN PRINT ME$:" と ": TLHTT 
339 Al=9:FORI=2TO07:IFM(T)=1THENPRINTN$(T):" と "ij:A1=1 年 
349 NEXT:IFA1=1THENPRINTCHR$(29 )CHR$ も (29)" ま まっ て ます " :GOTO159 HH 
359 GOTO549 TTTTTI 
369 ONAAGOT0379,799 ,899,969,1119,1169,1299,1239*? 1329,1349,1399 ,1429 + け ナー 
379 REM xxx Look THTT 
389 IFL0=9THEN559 學 
399 ONBGOTO 499,419,449,459,479,489,529 
499 PRINT"  x は な か ^ あり ます "EGOTO 159 U 
419 PRINT" "ii:IFBA=9THENPRINT" は *9 う ": 〔) 
429 IFB9=9THENPRINT" は = ": s 
439 PRINT " ト ~ ア か *~ あぁ あります":GOTO 159 ) 
449 PRINT "  xX きま か ~ た < さん あり ます ":GOTO 159 ea | 
459 IFFR=9THENPRINT "  x ふ ^ っ そう な か お まし た お と こ か ^ (ます ":GOTO 159 〇 
469 GOTO 549 Ne 
479 PRINT" 。 に の トラ モ ノ が か と いる "EGOTO 158 洋 
489 IFCA=9THENPRINT" 。 x ね < こ か 0 る " 
499 IFMC=9THENPRINT"  x マッ チ か ^ ぁ る " 
599 IFCA=9ORMC=9THEN159 
519 GOTO 549 
529 IFBA=1THENPRINT" 。 x まっ <5 た ^・・・ "EGOTO 159 
539 PRINT "  x > の へ や は き て ^ て ^ き て いる 3。 "EGOTO 159 
549 PRINT " ぁ に も あり ませ ん ":GOTO 159 
559 REM 
569 ONBGOTO 579,599,619,459,.649,669,529 
579 IFI2$=N$(1)THENPRINT" 。 * ふき みた に ・・・":GOTO 159 問 
589 GOTO 688 っ ば や 
599 IFI2$=N$(2)0RI2$=N$(3)0RI2$= "と ^ ぁ "THEN699 く ひ スー、 は 
699 GOTO 689 
619 IFI2$=" き "THENPRINT"  ※ えな た か" た くさ ん ある き に くだ ^ も 0 か ひな っ て ます" :GOTO159 
629 IFI2$=N$(4)ORI2$=N$(5)THEN699 
639 GOTO 689 
649 IFI2$= "は" け もの "THENPRINT" 。 * コワ イ ":GOTO159 
659 GOTO 688 
669 IFI2$=N$(6)0RI2$=N$(7)THEN699 
679 GOTO 689 
689 PRINT"  x そん な 0 みあ た り ませ ん か こ ・・・" EGOTO 159 
699 PRINT" x =~<》 う 50 "1 12 "て * す 。 "EGOTO 156 
799 REM ※※XX Take 
719 ONBGOT0729,749,779,819,819,829,859 
729 IFI2$=N$(1)THENPRINT" ++ あな た は と こく は ^ お を さわ っ て し まい ": :GOTO879 
739 GOTO 689 
749 IFI2$=N$(2)THENBA=1:M(2)=1:GOTO 889 
759 IFI2$=N$(3)THENM( 3 ) =1 :GOT0886 
769 GOTO 689 
779 IFI2$=N$(4)THEN869 
789 IFI2$=N$(5)THENKU=1 :M(5)=1:GOTO889 
799 GOTO 689 
899 IFE1=1THENB0=9:M(4)=1:GOTO889 
819 PRINT"  % と れ ま せん !1 "EGOTO159 
829 IFI2$=N$(6)THENPRINT"  *% に け ^ ひ て し まっ た ":CA=1:GOTO 159 
839 IFI2$=N$(7)THENMC=1:M(7)=1:GOTO889 
849 GOTO 689 
859 IFI2$=N$(4)ANDB0=9ANDBA=9THENPRINT"  * へ や に 0 か ^ っ 0 を ・・" EGOTO1538 
869 GOT0689 
879 PRINT" し ん て ^ し まい まし た ++ キ "5 EGOTO1699 奈 交 り 
889 PRINT" 0O.K":GOTO 156 く ペ ス 
899 REM xxx Talk Ll 
999 IFB<40RB>6THENPRINT" x たもと ・・":GOTO 159 
919 IFB=4THENPRINT" 『 タ ・ タ へ ~ モ ノラ ヲ ワケ テ クレ 』":GOTO 159 O 〇 


ゲー ミン プリ ー ズ 心 アス キー ( 合 03-486-7111) PC-8801, mk II つ 5 イン チ デ ィ ス ク \4.800 欠 新 し い ツ イプ の パズル ゲー ム 。 台 パ ヒル 
アッ 。 ッ ん /ー ト に 1 個 ある 間違い を 探し め て 、 ア メリ カン ギヤ ルズ を 復元 する 。 プ ラフ ィ ッ が 美しい 。 


FNIN ロ NIdR 光 くう 


の 


ふ 民 洪 光 へ ヽ 対 ロロ AS は へ ざこ eel9tl9t し 宙 d の 理 一 SH 


"へ イ 」 


NAZO リ スト 続き 


3 タタ 


929 
939 
949 
959 
969 
979 
989 
999 
1999 
1919 
1929 
1939 
1949 
19S59 
1960 
1979 
1989 
1990 
1100 
1119 
1129 
1139 


IFB=5THENPRI NT " 「 オ マエ ブ タ ヘ へ ~ テ ヤル ソ "」 と いっ て あ # を た は を た へ られ て し まい まし た" :END 
PRINT " 「 ね こさ ん この ふし き ~ な せ か いか ら ぬけ た ~ す ほう ほう を お し えて くだ ~ さ い 。』 
PRINT" 「 そん な こと お し え を たこ ニヤ う わた し は ころ さて ・・・ 
PR TI NT " ちか ~ うこ と お し えた け ~ る よ な そ ~ を あや つっ て いる 0 は この 0 いえ ニャ 0 を ~ 」":CA=1:GOTO159 
REM XX※※ MOVe 

IFB=1THEN720 

IFB=6ANDN$( 6 ) = I 2$THEN820 
BB=1:IFB=2ANDI2$=N$(3)ANDO0= 9THEN1039 

IF IT 2 も =N$ も (BB )THENPRINT"  ※ へ いつ に か わっ た こと は お こり ませ ん 。":GOTO 159 
BB=BB+ 1 :IFBB=8THENPRINT"  ※ うこ きま せん ":GOTO 159 

GOTO 1999 

00= 1 : PR I NT " 「 ア ー ア ヨク ネタ ナー オ コ シ テク レタ オレ イニ ナニ カ ア ケ ~ ゴ ヨウ 」 と こけ ひけ ^ と か ~ いっ て る 
INPUT " 「 ナ ニカ トー イイ 」" 5H$:PRITNT 

IFME$ も =H$ も ANDBA=1THENME=1:PRINT "0O.K! 1 と いっ て "53:GOTO 1199 
IFME$=H$STHENPRINT "いれ も ん か な いか ら ご ほ ^ れ を 1019:GOTO 159 

IFH$ も = "か きま ^ "THENKA=1:PRINT" 『P OK 1!」 "EGOTO159 
CB=CB+1:IFCB く 5THENPRINT" 。 『 ソ ン ナ モノ アリ マセ ン !」 "EGOTO 1949 

PRINT" 有人 ・/AN 用 と こま か し な か すら "5 

PRINT " ペン # な 0 ひと は いっ て し まっ た "EGOTO 159 

REM XX※X GO 

IFB=10RB=30RB=4THENB=B+1:PRINT" 。 ※ いと “とう し ます "EGOTO 159 
IFB=5THEN1 1 89 

IFB く >20RDO く >1THENPRINT "これ いし * ょ 
PRINT " 「 う ぁ あ あぁ ぁ ぁ ・・ 」 あな を は ト ~ ア 0 の も むこ 
REM ※※※ BaCK 

IFB=20RB= 4THENB=B-1:PRINT"  ※ も と と り ま す " EGOTO 159 
IFB=5THENPRINT" ++ 八 ~ サ モノ に ころ され "5 EGOTO 879 


いけ ませ - ん ":GOTO 159 


9 
う 0 む 0 せ か い に お ち 5 て "5EGOTO879 


PRINT " % こい し て ょ う も と ^ れ ませ -ー ん "5 GOTO 159 

REM ※※※ 

IFB=40RB=5THENPRINT"  ※ まけ を ・・・" EGOTO1609 

PRINT "あお と と ・・・ "EGOTO159 

REM ※※※ etC 

IFB=5ANDFR= 1THENPRINT "・・・・ あっ さっ き の 0 お と こ か "て て き て "サモ ノ ま 。 "5:GOTO 1299 
IFB く >6THENPRINT"  %※ 0 と り て * さわ いで でろ る 117 EGOTO 159 


IFBN く >1THENPRINT" 「 う る せい 11」 と いう こえ か " する "KBN=1:GOTO159 
PRIENT " 「 も うと 0 ヤー だ た) あと で も まう し 7 や る 」』 と り っ 3 で まっ うく ぐ 9 な が の Y に "1 
PRINT" と し "こめ うら て し まっ た "・B=7:GOTO 159 

PRTINT "ころ し て く < を そ ^11 リ EPRINT" 。 その 0 こ " お と こ は いっ て し まっ を "KGOSUB1520 


PRINT" し は らく ある いて いる と いえ か ^ あっ た 0 て ~ は いっ て みな た" 。。" 。 する と と いあ か 、 " 
PRINT" と し "て し まっ て と し "こめ られ て し っ た 。" 。。:B=6:GOTO 159 

IF B=3ANDI2$=N$( 4 )THENE1=1:GOTO 889 

GOTO 249 

IFB= 1ANDI2$=ME$ANDME= 1THEN1369 

GOTO 249 


FORI=15TO89STEP2:PLAY"n=Ii64":NEXT 

PRINT"  ※% と うつ せ ~ ん まり わり か ^ し ろく な っ て まき か * つ < と "B も (4)" に いた ":B=3:M(2)=9:M(3)=9 
ME=9 : GOTO159 

IFB=4ANDI2$=N$ も (5)THEN1419 

GOTO 249 

PRINT" 「 サン キラ ュー」 と いっ て さっ て いっ た ":FR=1:M(5)=9:GOTO 159 

IFB=7ANDI 2$=N$ も (7 )ANDMC=1THENBA=9:PRINT" 。 ※ 0 ひか" うつ 0 を "GOTO 150 
GOTO 249 

REM ※※※ 

PRINT 「" ある 0 あな な は な そ ~0 せ か い に ま よ っ て し まっ た ":PRINT 

PRINT " そこ て ~ は こん な て ル ^ み か ~ あっ た "。"  『 こ 0) せ か 0OO と ^ こ か に と の な そ "0 せ か い を ヴ 


PRTINT あや つっ て いる 3 と と ころ か " あぁ 3 は すず" あっ" 

PR INT " あな た は た ちあ か " り その は “し ょ に むか う 0 て ^ あ っ た "。。。 

PRINT" コマ ント ~ は と "うし まし は “の と こつ し + す めい も ま 0S5 が "な て で" いれ る 
PRTNT 。 。 (れい 0) いく / み か る / も と “る / みる は な / と る は < な と“ 

GOTO 79 


FORI=1TO2999:NEXT : RETURN 

PRTNT ,。" や YE 0 か "うう 9 り か し "に な うっ て し まっ た 「 、「 あな だ た は きとう し な い た お れ て し まっ だ た ・*・ 
GOSUB1529: GOSUB15209 

PRINT , 。 。。" きか "つく と ニー・・・ の 。。 リ あな た は し に ふん の 0 つや て ~、 た お れれ て いた " 。 

PR INT " や は り あの いえ か ^ な そ ^ を あや うっ て いあ の た ~ "GOSUB1529 

PLAY "oceed.dfedcc","o5ceed.de8f8fdcc" ,"V6o5ccco6d . def eCC 
PLAY'"eed.dfedcc", "eed.de8f8fdCc" , "Ccg.9V8aabg9 
GOSUB1529 : GOSUB1520 

RESTORE 1619:FORI=1TO19:READ A$:KEYI .A$:NEXT 

DATAcolor ,cload,goto,11iSt,run,SCTeen,CSaVve,pPTint,pl1ay,COnt 


WWWW 
靖 UM 


分 秒 の 順 で ~ で 区 切っ て 入 
力 す る こと 。 最後 に は 必ず リ 
eee プチ ター ム 導 


アラ ー ム 音 を 止め る に は 大 文 


/e 2 ヽ 4 ッ ト し な お す に は 大 文字 の A。 
遊び 方 


マコ ニー な 置き 時 計 に な る ね 。 


の と だ ZIA7 
の と /7 了 アア 


は っ きり いっ て 、 こ れ は 時 計 で す 。 字 の E (押し 続け る ) だ よ 。 
で も 、 ち ゃ ん と 日 付け ・ ア ラー ムッ 機 能 
休 き なん て すず 邊 。 
デア ラーム ツモ ツタ ド も タイ ム バ や セッ トド 
5 同じ や り 方 で 、 日 付 は 例え ば 84/09 200DOUEU2539SHUEINPT け PTNIPSZWTIRZ952 TEL03REGE ID の 5 
グ 23 の 証 う に へ 桁 の 数 字 を 年 月 日 の 順 0CATE 25.9:LINEINPUT" ナ ン 年 ナン 月 ナン 日 " ,Z$:DATE$=Z$:D$=DATE も ELSE 26 


39 LOCATE 24,9:LINEINPUT "ナン 人 財 ナン 分 ナン 称 


に に ブ "て 区 切っ て 入力 。 時間 は 13 :05 D$:LOCATE 79,4:PRINT T2$ 


49 LOCATE 2,9:LINEINPUT" キ 9 年 > 月 日 
還 エク マッ pm て 4 い ー デ - す ン 
・29( 午 後 1 時 5 分 29 秒 ) の よう に 、 時 59 LOCATE 28,9:LINEINPUT" イ マ 内 分 た 穫 


26:DATE$=Z$ 
"2Z$:TIME$=Z$:COLOR=(2.1) 


の $:TIME$=Z$:T2$=TIME$:LOCATE 79,2:PRINT 


| 
約 


69 FOR A=4.71238898# TO 19.99557429# STEP.194719755#:B=B+1:E(B)=C0S(A)x198+32B:F 
(B)=SIN(A)x85.485+169:M(B)=COS(A)x14+328:N(B)=SIN(A)x62.93+199:LINE(328.109)-(C 
0S(A)*219+329,SIN(A)x94.395+19 ) ,PSET, 7 :NEXT 

7 CIRCLE(326,169 ) ,26,2:PAINT(329,199) ,2,2:FOR A=4.71238898# TO 19.99557429# ST 
EP.523598775#:X=COS(A)x219+320:Y=SIN(A)x94.395+199 :LINE(329、109)-(X。Y) 。PSET。7:NE 
XT:CIRCLE(329,199 ) ,194,1:PAINT(329,199) ,1,1:LOCATE 62,23:PRINT "Technopolis !" 
86 COLOR 6:・ 

99 HH=VAL(LEFT$(TIME$,2) ) :MM=VAL(MID$(TIME$,4,2) ) :SS=VAL(RIGHT$(TIME$。2) ) :T=TIME 
:HH=HHx5:IF HH>=69 THEN HH=HH-69 

199 H1=MM/12:HH=FIX(HH+H1 ) :CONNECT(320,199 )-(E(SS) ,F(SS) ) ,7 PSET:CONNECT(328.19 
)-(E(MM) ,F(MM) ) ,5,PSET :CONNECT(320 ,199 )- (M(HH) ,N(HH) ) ,3,PSET:LOCATE 36。18:PRINT 
TIME$:LOCATE 36,16:PRINT DATE$:PLAY"S8M39L5N=PLiT20" 

119 IF TIME<>T THEN CONNECT(329 ,199 )-(E(SS) ,F(SS) ) , ,PRESET :CONNECT(E(MM) 。F(MM) )- 
(329,199 )- (M(HH) ,N(HH) ) , ,PRESET :GOTO 99 ELSE IF TIME$=T2$ AND DATE$=D$ THEN PL=7 
5:LINE(599,19 )-(635,49) ,PSET ,1,BF:GOTO 129 ELSE 129 

120 IF INKEY$="A" THEN LOCATE 79.2:LINEINPUT"",D$:LOCATE 7、4:LINEINPUT"" 。T2$:GO 


| 注 MI は さる nS こ Ar 4A と 4 
| 趣 半 4 さき ッ ン r JHHHo 放 前 ゆき 


し どり で 避 町 器 弄 洲 瀬 沈 元弘 | 


歴 
書 
紀 | 
は 
る 
も 
の) 
1 
枚 
な 
の 
で 
す 
だ だ: 
ん 


| さ 落 とる 。 一 叶い は 旨 - ボ で 


一変 数 リス ト ・「…… 現 在 の 時 間 ・ 70 ら 分 刻み の 目盛 を 描 ・ 玉 チ エ ツ フ ポイ ント 
E( )F( )…… 長 針 , 秒針 の X,Y ・ 日 1…… 短 針 の 補正 こく ・ パッ フ が 青 で 見 づら い 人 は , 
座標 ・ PL……PLAY の ON.OFF  : 80 カラ ー 設 定 と REM ・ 10 行 COLORZ, 1 を 7.0 に 、 
M( )N( )…… 短 針 の X, Y 座 標 ・ 軒 プ ロブ プラ ム の 説明 ・ 90 現在 の 時 間 ・ 50 行 COLOR=( ら , 1 ) を (2.0) 
BB…- 配 列 の 滅 字 ・ 10 初期 設定 ・ 100 針 を 描く ・ に 70 行 CIRCLE(320.100).194.1 
Z$…… 入 力 用 ・ 20 アラ ー ム の 有無 ” : 110 1 秒 経過 判断 , 針 を ・ を ,.194.0 に PAINT(320.100).1, 
D$S…… ア ラー ム の 日 付け ・ 30 アラ ー ム の 入力  ・ 消す ・ 1 を ,0.0 に 110 行 LINE(500.10) 
T2$…… ア ラー ム の 時 間 ・ 40 日 付 の 入力 ・120 アラ ー ム の 時 間 、 入 ・ (635.40),PSET. 1 .BF を ,PS 
HH-…… 現 在 の 時 00 時 間 の 入力 ・ カカ , アラ ー ム スト ッ ツ : ET.0,.BF に すれ ば バッ フク が 黒 
MM-…… 現 在 の 分 ・ 60 目盛 を 描き , 針 の 座 ・ 4 ・ に な つて 見 や すぐ な り ま す 。 
SS…… 現 在 の 秒 ・ 標 を 配列 に し まう ・ 130 エラ ー 娘 理 ・ 放 ヨ ッ シ ャ 賞 。 


TO 119 ELSE IF INKEY$="E" THEN PL=9:GOTO 119 ELSE 116 
139 LOCATE37 ,9:LINEINPUT"".Z$:RESUME 


レル / 


WW 
UM 


る 、 
(5 遊び 方 


迷路 と いう より も 制限 時 間 内 に な る 
べく だ くる ん の 数 字 を と っ て いく ゲー 
ム 。 キ ミ が 操作 する 数 字 は *5?。 1 一 
4、6 一 9 の 数 字 を この "5 "て 消し て 
いく の だ けれ と ど 、 画 面 の 数 字 と テン キ 
ー と 数 字 の 位置 が 一 致す る と きだ け 取 
の さと が で きる の だ が 、 だ と え ほ 、 “97 
の 右 縦 め ゅ 上 に 9 が 表示 され て いれ ば テ 
ン キ ー の [9] を 押し て 、 こ の 9 を 取る こ 


$ う 全 
9 


+ー 葵 Yu マー で | 
り 吾 VH て ここ oe のり 9 


ピン 


Jolw ど AJ 引 と 


本 
: 
史 
が か が 
好 
き 
な 
た の 
こく て 
ミド 
度 
は 
歴 
呈 
ン 
ュ 


下 。 ト ー エ ビー よび OLS の | 


EID iit す きら する TI) 


と が で 


ー ノ バー(【 
で 取っ た 数 字 が メロ ディ に 変 
換 さ れ て 流れ 、 そ れ ま で の 動 
き が 再現 され る 。 得点 は 数 字 
の 合計 だ 。 画 面 は 4 通り ある 
の で 好き な も の か ら 遊 ぼう 。 


きる の だ 。 
制限 時 間 は 5 分 。、 タ イム オ 


マ ま ん な か あ だ り の 5/ が ガキ 
三 。 な ん が 目 が ガチ カチ カ …… 


5 が の と 、 キ ざ が 今 き 


80)CO ふ て ょ 
る び yONA も YOCO も SCOD0O も うか) あい ひか へ に さち いい 


WIDTH49 ,25:RANDOMIZETIME:PLAY "T209V1405L8":DIM MM(999 ) ,MX(2099 ) ,MY( 20 ) 

FOR T=1T09:READ M$(T):NEXT:DATA A,B,C,D, ,E,F,G,。A 提 

COLOR7, 1:CLS:SYMBOL(59 ,50 ) , "サン ルー メイ ロ " 7.7 9:SYMBOL(51,52) "サン NT ーー メイ ロリ" 7,7,6 
PLAY "CDCDABC":LOCATE12,29:INPUT" が ル ん NO AA 1.2.3,4 "PEIF P>4 OR P=9 THEN49 
COLOR7 ,9:CLS:SC=9:X=19:Y=12:J=9:JJ=9:LOCATE9,3:FOR T=9TO799 
R=INT(RNDx9+49):IF R=53 THEN69 ELSE PRINT STRING$(1,R)i:NEXT 
LINE(9,1)-(39,24)," 還 ",1.B:LINE(1.2)-(38.23)。" "BEON P GOTO89,99,199,110 
FOR T=8TO16STEP4:LOCATE3,T:PRINTSPACE$(34) :NEXT EGOTO129 

LINE(8.5)-(31.29)。" "BELINE(19.5)-(19,29)," "EGOTO129 


LINE(4,12)-(35。12)。" "LINE(4.5)-(35.19)」" "LINE(35.5)-(4.19) "GOTO120 
COLOR1:FOR T=2T023:LOCATE18.T:PRINT" 軒 の NEXTELINE(6,12)-(33.12) 7 


COLOR7 :LOCATE26 ,9:PRINT "HI-SCORE":LOCATE15,9:PRINT "SCORE" 

LOCATE9,9:PRINT "TIME" :TIME$= "99:99:99":COLOR4:LOCATE34 ,9:PRINT HS:BEEP 
XX=X:YY=Y:LOCATE6,9:PRINT TIME$:LOCATE29 9:PRINT SC:LOCATEX,Y:PRINT"S" 

IF TIME$>"99:95:99" THEN219 ELSE B$=1NKEY$:B=VAL(B$):IF B=9 OR B=5 THEN149 
IF B<4 THEN YY=YY+]1 ELSE IF B>6 THEN YY=YY-1 

IF B=1 OR B=4 OR B=7 THEN XX=XX-1 ELSE IF B=3 OR B=6 OR B=9 THEN XX=XX+1 
A=SCREEN(XX,YY):IF A=B+48 THEN199 ELSE IF A=32 THEN299 ELSE149 


PLAY M$(B) :SC=SC+B: JJ=JJ+ 1 :MM(JJ) =B 

LOCATEX,Y:PRINT" "EX=XX:Y=YY:MX(J)=X:MY(J)=Y:J=J+1:GOTO149 

IF SC>HS THEN HS=SC:LOCATE34.9:PRINT HS:FOR T=9T0299:BEEP1:BEEP9:NEXT 
FOR K=9TO0JJ:PLAY M$(MM(K) ) :NEXT:FOR K=9TOJ-1:LOCATE MX(K) ,MY(K) :COLOR2 
PRINT"5":FOR T=9TO199:NEXT:LOCATEMX(K) ,MY(K) :COLOR4:PRINT" 還 "NEXT 
LINE(9,8)-(649,299 ) ,PSET, 1.BF:COLOR7 :LOCATE19,12:PRINT "モウ イト ~ ヤリ マス カー Y/N" 
A$=INKEY$: IF A$="Y" THEN39 ELSE IF A$="N" THEN END ELSE259 


画 変 数 リス ト ・ AS.B$S…… キ ー 入 力 ・ 50-60 初期 値 お よび 乱数 発 ・ 190 MP pl 4 pp 
MM( )…… メ ロディ 記憶 用 。 ・ B…… 入 力 数 字 生 ・ 200 座標 記憶 
MX( )MY( )…… 移 動 X・Y 座 ・ XX.YY…… 移 動 座標 ワー フ  ・ 70 パタ ダーン 番号 より 各 ・ 210 ハイ スコ ア 

標記 憶 用 ・ A…… キ ャ ラフ タコ ー ド 行 へ ・ 220-230 プレ イ 再現 
MS$( )…… 音 階 読み 込み ・ 田 プロ ブラ ム の 説明 ・ 80-130 画面 作成 ・ 240-250 リプ レイ orEND 
P…… 画 面 パタ ー ン No. ・ 10 初期 設定 ・140 タイ ム 等 表示 ・ 囲 チ エッ フ ボ ポイ ント 
9665 ・ 20 音階 読み 込み ・150 タイ ム 判 断 , キー 入 ・ アイ デア は いい で すね 。 面 の 
HS…… ハ イス コア 2 .80 タイ トル カ ・ パタ ー ン は 80-110 行 。 自分 で 
XY…… 秘 動 座標 ・ 40 画面 パタ ー ン 番号 入 ・ 160-170 座標 物 動 ・ パタ ー ン を 作る の も いい ね 。 
り .JJ…… 移 動 回 数 と ・180 数 字 一 致 判断 ・ 廊 バッ チリ 賞 。 


レイ ン 


の だ ルル 7 
フリ コメ / コ 


WW 


WWWW 回 還 回 部 


マ 力 強い ツイ トル を 上 空 に 見 THTTTL 
な が ら 、 ス ペー ド は 果て し な TLTTTTL 
き 大 地 を 跳ん で いく の だ つ だ 。 LTTLTI 
エネ ルギー が 0 に な っ た 
り 、 有 石 に ぶつ か っ て し まっ 
だ りす る と ゲー ム オ ー バ ー。 


い ぶ 進ん だ 距離 が スコ ア に な る 。 

衝 び 方 と きど き 、 エ ネル ギー カ 
RUN す る と 、 い き な り は じ め る の で プ セ ル ( 夫 ) が 落ち て いる の 
十分 心 の 用 意 を し て か ら 始 め よ う 。 で 。、 ご は ジャ ジジ せ ず に 


全 が キミ 、 欠 が 石 で 、 キ ミ は [21 キ ー 。 ひろ うこ と 。 エ ネル ギー が 
を タイ ミン グ よ く 押 し て 、 こ の 石 を ジ 15 増 える ぞ 。 
ャ ング し て いく 〈 く の だ 。 [GRAPH | キー を リプ レイ は 、 
押し な が ら [2] を 押す と 、 ふ つう より 高 。 キー を 押 そ う 。 

〈 ジャ ング で きる の で 、 石 が 固まっ て 
きだ と きど と に 利 用 し よう 。 だ た だ し 、 


エネ ルギー は 、 ふ つう ジャ ンプ する た 1 '[[[ JUMP : FOR FM-7 : イル ラン ト ^ 198 : 1984 ほ 8 月 28H : 88x25 1 か 必 アロ グラ ムコ ]] 
3 導 AE RS 2 MIDTH 49.25:CONSOLE 9.25.9.8:RANDOMIZE TIME:DEFINT A-Z:SCREEN 7.7:FOR I=1 TO 
- 2 減り 、 大 ジャ ンプ で は 5 減る ぞ 。 5:COLOR=(1.4) :NEXT 1:COLOR=(7.4) :COLOR=(6.8) :COLOR 7.9:CLS:PLAY"L6405":Y=18:E=26 

:DIM TX(8):FOR I=1 TO 8:TX(I)=18+Ix3:NEXT 1:SYMBOL(9.9) "JUMP!"。10.8.6 

36 LINE(9.152)-(639.199) 、PSET.6.BF:LINE(358.152)-(458.199) 。PSET。7:LINE(28。152)- 

(186.199) .PSET .7:LINE(209.152)-(9.199) .PSET、7:LINE(439,152)-(639。199) 。PSET。7 

49 FOR !=1 TO 5:READ X:PAINT(X、152).1.9.7:NEXT IEDATA 9.210.315.429。639:COLOR 7 

59 FOR I=5 TO 1 STEP -1:COLOR=(I.1):LOCATE 18.Y:PRINT" ":IF Y く 18 THEN Y=Yt1:E=E- 

1:PLAY"ED" ELSE COLOR=(6.8) 


69 A$=INKEY$:IF A$="" OR Y<>18 THEN 7 ELSE COLOR=(6.6):IF A$="2" THEN Y=16 ELSE 
IF A$="+" THEN Y=13 

79 LOCATE 25,.2:PRINT USING"ENERGY 提 "1E:LOCATE 18、Y:PRINT"$":SC=SC+1:LOCATE 25 
・4:PRINT USING" SCORE 提 拉 仁 " SC 

89 FOR J=1 TO 8:LOCATE TX(J),18:PRINT" ":NEXT J:FOR J=1 TO 8:TX(J)=TX(J)-1:IF TX 
(J) く 9 THEN TX(J) =RND( 1 )*5+35 


いな て WS は 団 | 


39 LOCATE TX(J) 18:PRINT"@":NEXT J:LOCATE TX(8)、18:PRINT"@":S=SCREEN( 18.Y) 

199 IF S=ASC("@" ) THEN E=9 ELSE IF S=ASC("@") THEN PLAY"CDEFGAB" :E=E+15:LOCATE 1 
9.16:PRINT"ENERGY = ENERGY + 15":LOCATE 19.16:PRINT" E 

110 IF E<1 THEN FOR !=1 TO 19:PLAY"BAGFEDC" :NEXT I:LOCATE 18.18:PRINT"X":LOCATE 
15.19:PRINT"GAME OVER":COLOR=(6,6):LINE(9.152)-(639、199) ,.PSET,7.BF:LOCATE 12,12: 
INPUT"PUSH RETURN KEY ":A$:RUN ELSE COLOR=(I.4):NEXT I:GOTO 56 


け 
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す 


は ロ き (( 。 半 表 水 雪 S て すき 4 な で さ つ | 
| HerS で VH ここ 還 出 析 叶 | 


_ 国 vd ミ ー ロ さ ハ ラー こす ロ 回 ご 性 S9* | 
MtJ 秋 JJ の VH へ 9 ズ エ デ 


_ Serv ささ H 


ラフ マタ コー ド ・ 80~ 90 岩 と エネ ルギー カプ : を 設定 し て も いい か な 。 
・ 較 プロ ブラ ム の 説明 セル 移動 、 プ レイ ヤ ・ エネ ルギー カプ セル を 取る こと 、 
* 0 REM 文 ・ ー の 位置 の キヤ ラフ :* 毎回 15 ず つ エ ネル ギー が 増え る 
TX( )……: 石 の X 座 標 ・ 20- 40 初期 設定 、 画 面 作成 タコ ー ド 読み 込み ・ が 、100 行 =E+15 を :F=INT 
TX(8)…… エ ネル ギー カプ セル : 50 地面 処理 、 プ レイ ヤ ・100 キャ ヤラ ク 々 判断 ” :(RND(1)*11)+5: ビ = ヒ E+F に 
の X 秦 標 ー 消 去 :110 エネ ルギー 切れ 判断 ・ 変 えて 、 次 の ENERGY 二 15 を 
A$…… キ ー 入 力 用 ・ 60 キー 入力 と 処理 ・ 玉 チェッ フ ボイン ト "ENERGY す ?FFOR 日 =0 
SC…… ス コア ・ 70 エネ ルギー と スコ ア : 80x25 字 モー ド で の 1 画面 で ・ TO 500:NEXT H こ すれ ば い 
ら …… プ レイ ヤー の 位置 の キヤ ・ と プレ イヤ ー 表 示  :・ す が 、 ボ ー ナ スポ イン ト な ん ガ : いね 。 災 ヨッ シャ 賞 。 
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W 
nM 


信号 が 述 中 の 障害 物 に ひつ 
が か が つ だ と だ ん 、 ピ ビ ピッ / DG6- 
VIce |/ 〇 Errorl 

*&” を あや つっ て 、 ポ 
ツボ ポン ッ と 出 て (る 障害 物 
の 真下 (まだ は 真 上 ) へ 


遊び 方 行き 、 スペ ー ス ・ キ ー ぞ を 


## ま を SHVE SR LURD7 


押せ ば 取り 除け る 。 
テー ブレ ュー ダ で SAVE や LOAD エラ ー を 5 回 し て し ま 


を が 人 や っ て る キミ は 、 セ ン と くる ゲー ム 。 うと 、 ゲ ー ム オー バー。 
画面 上 の コード は SAVE 用 、 下 の コ 信号 を 無事 通す と ボー ナ 
ー ド は LOAD 用 。 それ ぞ れ の 中 心 を 通 ス 1000 点 。 リ プレ イ は 何 
る 黄色 い 線 が 信号 線 だ 。 か キー を 2 度 押 そ う 。 
この SAVE の 左端 か ら 、 右 端 へ 、L 
OAD の 右端 か ら 、 左 端 へ 、 信 号 (*) 
が 削る の で 、Device TO Error(!) 


ミ H 泌 ゝ っ リー ニ CT 【 ュ 

カ 出 ょ い さ に 障害 物 ( 倫 ) を 取り 除 【 19 REM HH SAVE 8 LOAD2 For_H47 By T.UCHIDA 1984/8/20 相 村 提 革 村 相 村 村 

て ほし い の だ 11 COLOR 7.9:MIDTH 8、25:RANDOMIZE TIMEES=9:X=49:Y=10:M=:ILOCATE 9.6:RESTORE 
OO 


12 SYMBOL(59、15) "www SAVE & LOAD2 。 www"、3、2、5:LINE(9、159)-(639.199).PSET 4 
13 A も ="ー"EB も = リー C も =A も ED も =B も :FOR LE9 TO 78:A$=A$ も StC も :B$=BStD も ENEXTEFOR LE9 10 11: ド 
EAD CECOLOR CEPRINT "7 ASICOLOR 6:PRINT B も ECOLDR CEPRINI ASENEXTEDATA 2.7 
COLOR 5:LOCATE 19.29:PRINT "HI-SCORE" SPC(20) "SCORE" SPC(29) "MISS" 
FOR F=9 TO 2:FOR LE1 TO 79 STEP .5:COLOR 7 
) LOCATE 15.22:PRINTUSING " 提 持 半 "HE1LOCATE 43.22:1F H<S THEN H=S:GOTO0 16 
PRINTUSING "人 村 折 人 "15E 1 INT(RNDx89)=9 THEN LOCATE INT(RND*78)41.8:PRINT @ り 
LOCATE 66.22:PRINT M:IF INT(RND*89)=9 THEN LOCATE INT(RND*78)41、13:PRINT 人 
1$=INKEY$:1F 1$="4" AND 1<X THEN X=X-1 ELSE IF 1$="6" AND X<78 THEN X=X+1 
IF 1$="8" AND Y=11 THEN LOCATE X.YEPRINT |) の YE10 
IF 1$="5" AND Y=16 THEN LOCATE XYIPRINT SEY=11 
COLOR 4:LOCATE X-1.Y:PRINT "8 "COLOR 6:」F I$2 く CHR も (32 ) THEN 24 
IF Ys19 THEN LOCATE XY-2:PRINT "-" ELSE LOCATE XY+2:PRINT ーー 
IF F=1 THEN IF SCREEN(L.8)=236 THEN S=S-599:GOTO 27 ELSE BEEP 1:LOCATE L-1.8: 
PRINT "-"ECOLOR 3:PRINT "ES=S+2:BEEP 9 
25 IF F=2 THEN IF SCREEN(79-L,13)=236 THEN S=S-699:GOTO 27 ELSE BEEP 1:LOCATE 73 
-L,13:COLOR 3:PRINT "w"EECOLOR 6:PRINT "- "5S=S+1:BEEP 9 
26 NEXT:NEXT:S=S+1999:GOTO 15 
27 BEEP 1:M=M+1:LOCATE L-1.8:COLOR 6:PRINT "--"ELOCATE 79-L、13:PRINT "ーー" ELOCATE 
39 16:COLOR 2:PRINT "Device I/0 Error":FOR B=9 10 699:NEXT:LOCATE 39.16:PRINT S 
PC(16) :BEEP 9:1F M>5 THEN BEEP 1:SYMBOL(59、59) 、"GAME OVER" 、4.3.3 ELSE 15 
28 SYMBOL(390,99 ) , "SCORE "+STR$(S).3.2.5:1$=INPUT も (2):BEEP 9:GOTO 11 


JASe ひ て 石 団 較 こき 壮 AvSt 1 
1 て て は みせ りう 葵 コイ ーm Vi 年 当 癌 。HQ ぐ 


は どり と 糸 く きよ d 圧 は JO カヨ 0 ン /| 9 
-IA9H て SKK ざけ と 下記 薄 ③ 芋 潮 さ と 


病 紐 ざき 必 ご テー ロ mm の 寺 ビ ドー キミ 9 
rr 。 と は まぐ で すみ の ひき 相 画 弟 装 い 


男 変 数 リス ト ・ プ ロブ ラム の 説明 定 ・ 白 が あか な こく て す む お 。 あ と 、27 
S…… ス コア ・10 REM 文 ・ 27- 28 MISS 処 理 と GAM : 行 の 最初 の BEEP1 の 1 を 取り 
H…… ハ イス コア 9 人 初期 設定 E OVER ・ FORB=0 「O600 を TO 20 
XY………&" の 座標 : 12- 14 画面 作成 ・ 田 チェ ッ フ ボイン ト ・ 00< ら い に し て 、BEEP 0 を 取 
M……MISS 数 ・ 15- 26 メイ ン ル ー チ ン : 障害 物 を 排除 し て も 得点 が 入 : る と 、 エ ラー が 見 や すぐ な る 。 
AS.BS,CS,DS…… 画面 作成 : 16-18 スコ ア な どの 表示 と : る よう に し た ら ど うか な 。23 行 : 災 ヨ ッ シ ャ 党 。 

用 5 衝突 判定 ・ の ELSE の 前 と 最後 に :G=S+ ・ 
LF.B…… ル ー プ 用 ・ 19-23 キー 入力 と 判定 処理 ・10 を 入れ まし ょ う 。 PRINT の : 
| 軸 …… キ ー 入 力 用 ・ 24^25 ^*" の 表示 と 衝突 判 ・ 後 の スペ ー ス を 取れ ば 、1 行 空 ・ 


し ん 】 


WWWW 


遊び 方 

基本 的 に は スネ ー ク ゲー ム な の だ け 
れ ど 、 プ ラス o の 有 要素 で リア ル タ イ ム 思 
考 が ゲー ム に な っ て る と ころ が いい 。 
I214I618| キ ー で スネ ポー ク を 操作 し て 、 
画面 に 現れ て いる アル ファ ベッ ト を 全 
部 取れ ば 1 面 ク リア 。 

た だ し 、 地 雷 (X) を 踏ん どり 、 エ ネ 
ルギー が 0 に な る と ゲー ム オ ー バ ー が ど ) 
エネ ルギー は 最初 0 で は じ ま り 、 画 


リリ 3「 バ ー 


まる まま すす ミ る まま すす を を する も ます まま を た る を を る ネネ ミネ ネネ] 


婦 < ょ ・ 分 ステ 


た HE す RT KEY] 
まま すま も オミ キミ オミ すす すす すす ネ ミ すま すす すす すす すす ミ す ) 
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ユ 


疲 て と は 二 圭 束 ト ー エ ざさ っ 
_ NNIN と さき 0W 合 守 /K さ させ せり 浴 WS 
> ッッ > せ SWCAO 沿 


で - 
〆 


NN させ JO の 生み 培 寺 寺 に NN 


JammmNSm 各 き 避 SFMN ロ NL 
し ささ ン ン な S は で 融 N コ トーNV2 


( ロ NIS 肖 ゆ 、、 


ww 


面 の ほとん ど を し め る ドッ ト を 取る ご 
所 おす つ 0 疹 えて いく 。 そし 自分 の 
通っ だ あと を 通る と 、 1 マス 重なる ご 
と に 50 ず つ 減 っ て いく の だ 。 だ か ら 最 
初 の うち に いき な り 自 分 の 体 に ぶち あ 
だ た る と だ ち ま ち エ ネル ギー が 0 に な っ 
し ゲー ム オ ポー バー。 な る で く 同 じ 追 を 
2 度 と 通ら な いよ うに 考え て 進ま な く 
ちゃ いけ な いわ けが だ 。 
画面 右上 に 英 単 語 が 表示 
され て いて 、 こ の つづ り の 
順に ひろ っ て いく と 、 ボ ー 
ナス な ん と 500 点 。 こ れ が 結 
構 難 し いん だ よわ 。 

ボー ナス は 他 に も ある 。 


rprcrrcccrrpCEEHHEER EE 


素 
素 


EEE 


ea 2 を る の あか ゃ と る 3 は 
も 


は 10 点 の ボー ナス 、 珍 は ミス テリ ー 
ボー ナス 。 

ルー ル の や きき し いと ころ は 、 壁 に ぶ 
つか っ て 6 ゲー ムキ オー バー に な ら ず 


だ だ 止ま を る だ け と いう 点 。 ち ょ っ と 上 区 


じ ぶ が つた だら 、 幸 に つっ こん て し ば 6 
〈 コース を 考え る の も いい か も わ ね 。 画 
面 パ タン は 5 面 ま で ある よ 。 

文 参考 「 プ ログ ラム ・ ポ シェ ッ ト 」V 
o1.2、『Zeppi」 


第 1 面 、 す ば や ぐ 判 断 し て キチ ン と 
S・C・H・O・O・L の 順に 取り だ いね 。 


人 2 は ・ < し 

角 as asazeeeoroG 唱 ロ ・<・ < 
を wsg 移 ae ぐる を e は ><< < し が 
前 
錠 e wa 区 seceeoxvx 則 GO 


免疫 全 ああ 相克 人 ゆ 芝 二 彰 湖 


に 信介 
し 朋 往 まま まま まき 


や や 難し い 2 面 。 ど ご こ か 
で 壁 に つけ と いて 、 じ レ じ つく 
り 道 を 考え て みよ つう 。 


し 計 半 き 
* 旨 * 
多 品 * 
に 才 * 

* 各 < 


人 
人 
人 


タッ チ ダ ウン 心 ウ ィ ン キ ー ソ フト (会 06-372-8566) PC-8801, mk II テープ \4,000、5 イ ンチ ディ スク \6,000 久 ア メ 
リカ ン フ ツ ト ボ ー ル の シミ ユ レ ーション ゲー ム 。 フ ォ ー メ ンション チェ ンジ で パラ エ テ ィ に 富ん だ 攻撃 が で きる 。 


レル / 


に JNNJdD 党 
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19 

29 

39 

49 

S9 

69 

79 

89 

99 
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1 49 
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189 
190 
290 
219 
229 
239 
249 
259 
269 
279 
289 
2909 
399 
319 
329 
339 
349 
359 
369 
379 
389 
399 
4909 
419 
429 
430 
449 
459 
469 
479 
489 
499 
S99 
S19 
っ 29 
S39 
o49 
SS9 
S69 
o79 
S99 
S99 
699 
610 
629 
639 
640 
659 
669 
679 
689 


_ 699 


イグ / 


799 
719 
720 


' 還 還 間 間 昌 間 間 間 還 較 シヨ キ + セッ テイ 還 間 昌 間 間 間 間 昌 昌 還 


WIDTH 49,25:CONSOLE 9.25.9.9:RANDOMIZE TIME/4:DEFINT A-Z 
DIM ME$(5) , し も (5) ,U$ も (6) ,M1(25) ,N1(25) ,M2(25) ,N2(25 ) 

っ SC=9:EN=9:SX=1:SY=9:X=3:Y=3:LO=9:HIS=1999:MEN=@ : LMEN=9 : XX=9:CC=59:J=1 
FOR E=1 TO 5:READ ME$(E):NEXT 

FOR E=1 TO 25:READ M1(E),N1(E) ,M2(E) ,N2(E) :NEXT 


uo>5>=>5※〔… パ 〔 ペ 。 # 誤 ゆあ を 組 = 5'5〔 


CLS 


U$(1)=" 
U$( 2 ) = アア 男 
U$ も (3)=" 男 ど 較 画 
U も (4)=" 圏 
U$(5)=" 

U$( 6 ) =SPACE$( 33) 

FOR Q=1 TO 6 

FOR Ww=6TO Q STEP-1:COLORQ ELOCATE3 ,W:PRINTU も SB(Q) 
NEXTW,Q 

LINE(9.8)-(39.24)。"w".3。B 
COLOR5:LOCATE7Z,11:PRINT "KEY" 
COLOR7:LOCATE5,13:PRINT" 8 
LOCATE5,15:PRINT"4 一 6" 

LOCATE5,17:PRINT" 2 「 


COLOR4:LOCATE29,19:PRINT"@"+CHR も ( 254 )+CHR$ も (254)+" ..。 YOU" 
COLOR6:LOCATE29,12:PRINT" ・ ..。 ENERGY 1" 
COLOR2ELOCATE29.14:PRINT" $ ... 5 POINT" 
COLOR3:LOCATE29.16: PRINT" @⑲ .. し 2 POINT" 

COLORS :LOCATE29.18:PRINT" ロロ ・・・ カト" 

COLOR1 :LOCATE29.29:PRINT "| X ..。 ジラ イ " 


COLOR5 :LOCATE13.22:PRINT"[HIT ANY KEY]" :T$=INPUT も (1 ) 
CLS:X=3:Y=3:SX=1:SY=9:LO=9:EN=9:XX=9 


MEN=MEN+ 1 : LMEN=LMEN+ 1 : IF LMEN=6THEN LMEN=1:FOR E=1TO 5:L$(E)=" "ENEXT 


V=LEN(ME$(LMEN ) ) 

' 還 還 昌 間 間 間 琴 較 力 ^ メン サク セイ 還 是 昌 昌 間 間 間 間 間 間 

LINE(2.2)-(28.23) "回" 1.B 
LINE(29.2)-(39.23) ," 還 "。5。B:LINE(29.2)-(39.6)。"% "3。B 

COLOR6 :LOCATE3, 1:PRINTUSING"MESSAGE くく く & &>22" 5 ME も (LMEN ) 
LOCATE39.3:PRINT "MESSAGE" 

LOCATE39.8:PRINT "HI-SCORE“ 

LOCATE33.11:PRINT "SCORE" 

LOCATE32.14:PRINT "ENERGY“" 

LOCATE35.17:PRINT "MEN" 

COLOR7:LOCATE36.18:PRINT _ USING 「 柱 村 "jiMEN 

FOR D=1 TO 29:NEXT 

LOCATE19,12:PRINTUSING" 杜 men START "iMEN 
LINE(3。3)-(27 22) 。"・”"、6,.BE 

FOR R=1 TO 5 

LINE(M1 (J) 。N1(J) )-(M2(J) 。N2(J)) "HP 5:J=J+1:1F J=25 THEN J=1 

NEXT 

FOR R=1 TO (LMENx5 ) 

M3=(RND( 1 )x24)+3:N3=(RND( 1 )x19)+3 

D=SCREEN(M3 ,N3):IF D く <>165THEN 599 ELSE LOCATEM3,N3:COLOR2EPRINT "を 
NEXT 

FOR R=1 TO LMEN/2 

M4=(RND( 1 ) x24 )+3:N4=(RND( 1 )x19)+3 

D=SCREEN(M4 ,N4):IF D<>165THEN 549 ELSE LOCATEM4,N4:COLOR3:PRINT "の 
NEXT 

FOR R=1 TO LMENx19 

M5=(RND( 1 )x24)+3:N5=(RND( 1 )x19)+3 

D=SCREEN(M5 ,N5) : IF D<>165 THEN 589 ELSE COLOR1 :LOCATEM5 ,N5:PRINT"X" 
NEXT 

FOR R=1 TO V 

M6=(RND( 1 )x24)+3:N6=(RND( 1 )x19)+3 
D=SCREEN( MG6 , N6 ) 

IF D=16STHEN669 

GOTO 629 

LOCATEM6 , N6 : COLOR7 : PRINTMID$ も (ME も (LMEN ) , KR, 1 ) 
NEXT 

FOR D=1 TO 1999:NEXT 

* 画題 間 還 間 昌 還 本 本 昌 キ - ニ っ ウリ ヨク (YOU イト “ ウ ) 回 還 還 還 間 間 間 間 昌 較 
1 $= INKEY$ も 

IF !$="4" THEN SX=-1:SY=9 

IF I$="6" THEN SX=1:SY=9 


739 IF 1$="8" THEN SX=9:SY=- 1 

749 IF 1I$="2" THEN SX=9:SY=1 

7S50  ' 還 還 間 間 間 間 間 間 還 還 間 )\ ン テイ 

769 X=X+SX:Y=Y+SY:D=SCREEN (X,Y) 

779 IF D=9 THEN 869 

789 IF D=135 THEN X=X-SX:Y=Y-SY:GOTO 869 

799 IF D=219 THEN X=X-SX:Y=Y-SY:GOTO 869 

899 IF D=165 THEN EN=EN+ 1 :GOTO 869 

819 IF D=249 THEN 1129 

829 IF D=234 THEN SC=SC+ 19:GOTO 869 

839 IF D=233 THEN SC=SC+RND( 1 )x199:GOTO 869 

6849 IF D=254 THEN BEEP:EN=EN-59:GOTO 869 

859 LO=LO+ 1 :K$=CHR$(D) :L$(LMEN ) = し も (LMEN ) +K$ 

869 FOR D=1 TO CC:NEXT: IF CC く <19 THEN CC=589 

879 COLOR4:LOCATEX,Y:PRINT"@":LOCATEX-SX,Y-SY:PRINTCHR$( 254 ) : BEEP1 : BEEP9 
889 IF SC>HIS THEN HIS=SC 

G90 ' 画 還 還 昌 間 間 間 間 間 症 較 トチ ッ ウ ケッ カノ ヒ ヨ ウ シ ~ 還 還 還 還 間 昌 間 間 間 間 議 

999 COLOR7:LOCATE39 , 4:PRINTL$(LMEN ) 

919 IF LO=V THEN GOSUB989 

929 COLOR7 : LOCATE33 ,9:PRINTUSING" 本 "jHIS 

939 LOCATE33,12:PRINTUSING" 柱 提 提 壮 拓 " 1 SC 

949 LOCATE33,15:PRINTUSING" 韻 拉 持 半 拓 " : EN 

959 IF EN<9 THEN 1129 

969 GOTO 799 

97 ' 還 還 昌 間 間 間 間 症 昌 メン クリ ア 還 還 間 間 間 間 間 較 

989 LINE(3,.3)-(27.22) 。" 還 ".9,BF 

999 IF ME$(LMEN) =L$ も (LMEN )THEN SC=SC+590 

1999 COLOR 5:LOCATE6.5:PRINTUSING" 揚 寺 men Clear "jiMEN 

1919 COLOR7:LOCATE3,8:PRINTUSING" SCORE 半 后 半 ## " SC 

1929 LOCATE15.8:PRINTUSING" ENERGY 拉 持 # 寺 ":EN 

1939 COLOR2:LOCATE4.19:PRINT "SCORE" 

1949 FOR EN=EN TO 9 STEP-1 

1959 LSC=XX+SC: BEEP1 : BEEP9 

1969 LOCATE 9.19:PRINTUSING" 欄間 提 韻 半 + 韻 韻 韻 斗 = 提 持 韻 拓 "1SCiEN:LSC 

1979 XX=XX+1 

1989 NEXT:SC=LSC:CC=CC- 19 

1999 FOR D=1 TO 5999 :NEXT 

1199 GOTO 399 

1110  ' 還 還 間 間 間 間 間 間 間 症 昌 ソ "-/、 オー) ハ \)~ - 上 昌 昌 間 間 間 間 間 間 半 

1129 FOR D=1 TO 7:COLORD:LOCATE19,12:PRINT "GAME OVER" :LOCATE7 , 13:PRINT "モウ イチ ト ~ ヤ リマ 
7 し Y/N) “ 

1139 G$=INKEY$:IF G$="Y"OR G$="y"THEN SC=9:MEN=9 :LMEN=9:J=1:FOR E=1 TO 5:L$ も (E)=" 
"・NEXT:GOTO399ELSE IF G$="N" OR G$="n"THEN END 

1149 NEXT:GOTO 1126 

115 り ' 還 還 間 間 間 間 症 症 本 蘭 メッ ヤー シー . カ ヘー ノ テ ~ー タ 敵 還 還 間 間 間 間 間 還 間 

1169 DATA SCHOOL , TECHNO ,POLIS,BASIC,FLOWER 

0 00 2 25 く 1 の.4 19.20、19 14 95.14、20.15.5.18.20、16.9.16.20.8.5.12.12.12.19 
> ウ ュ 2006 12、25.5、19、19 05 20.15 5、159、20.5.5.26.5.5、12.25.12.5.20 25.28.11.6.11 1 
20、1 ま は 20.10.5 56、25.0.5、11.25.141.5.17.25.20.5、12.5,/14.25、11.25 193.5.5.8.20,22.5 
ぅ 25 。 2 

60 DAIA 5.22 5 9.20.23、20.8.8.22、17 


田 交 数 リス ト ・ CO…… 自 分 が 動 こ と き の ス ピー: 690-740 キー 入力 > ペ ツ セー ジ を そろえ たら 、 フ 
MES( )…… メ ツ セ ー ジ 5 ド 調整 ・ 750-850 何 に ぷ ぶつ か つ だ か : アン フタ アー レ ぐ らい は ほし いな 。 
LS( )…… 自 分 が ひろ つた メ ツ ・ V…… メ ツ セ ー ジ の 長 さ の 判定 ・ 自分 の 歩い た 跡 を 踏む と 、 工 
セー ジ ・RR…… 画 面 作 成 の だめ の ルー プ : 860870 自分 の 表示 ・ イル キー が 50 減 る けど 、 慣 れ な 
US( )…… タ イト ル ・ D…… 何 に ぶつ か つた か 判断 用 ・ 880 ハイ スコ ア の 入れ ・ いう ち は き つい で すね え 。840 行 
M1()N1OJM2C)N2( )… | ゆ …… キ ー 入 力 用 変え ・ の EN=EN- 50 の 50 の 値 を も 
画面 の デー タ ・ KS$…… ひ ろ つ だ 文字 ・ 890-940 スコ ア , ひろ っ た ・ う 少 し 小さ くし まし よう 。 ま た 、 
SC…… ス コア ・ G$…… リ プレ イ 入 力 用 。 メッ セー ジ な どの : ハー ト を 取る と 、 ス コア は 加算 
HIS…… ハ イス コア ・ 還 プロ プラム の 説明 ・ 表示 ・ され ます が 、 エ ネル ギー も 補給 
EN…… エ ネル ギー ・ 10- 40 初期 設定 (第 1) ・ 950-960 エネ ルギー 切れ 判 : され て も いい と 思う 。830 行 の 〇 
SX.SY…… 自 分 の 進行 方向 ・ 50- 60 デー タ 読 み 込み 処理 ・ 断 ・ OTO860 の 前 に EN=ENT+RN 
XY…… 自 分 の 座標 ・ 70-170 タイ トル 表示 ・970-1100 面 フ リア の 処理 ・ D(1)*50 と で も し た ら ど うか 
LO…… 自 分 が と つ だ 文字 数 = ・ 180-290 ゲー ム の 説明 表示 ・1110-1140 GAMEOVER : な 。 時 間 制 限 を も うけ て 、 面 
MEN-…… 面 数 ・ 300-320 初期 設定 (第 2) ・ 1150-1180 メッ セー ジ , 画面 : リア 時 に 残り 時 間 を ボー ナス と 
LMEN…… メ ツ セ ー ジ , 画面 の ・ 330-680 画面 作成 ・ デー タ ・ し て 加算 する こと いう の も いい か 
選択 ・ 690-960 メイ ン ル ー チ ン : チ ェ エッ フ ポ イン ト ・ な 。 娘 バッ チリ 賞 。 


ピタ 


婦 コ の 追っ が け は な が な が か しつこく 

ちょ っ と 気 を 許す と た ち ま ち つ か まっ 

EN まつ を 6 

ヽ や ゆう じ MAN に は 武 父 は な い が 、 画面 
N 遊び 方 の 右側 に ある 4 つの くぼみ か ら 、 反 対 
主人 公 は ゆう じ MAN。 これ 、 作者 の 側 の 通路 へ と ワー プ す る こと が で きる 。 
悪友 を けなし て や ろう と 作り 出 き れ た この ワー プ を 使っ て 、 タ コ と の あい だ 


4 えい つ 、 ワ ー プ だ / 


キヤ フク ク な ん だ で く ナ だ 。 に 適当 な 距離 を 保ち な が ら ド ッ ト を 取 
ゆう じ MAN を |2|4I6I8S| キ ー で 上 下 。 っ て いこ 2。 
左右 に 動か し て 、 タ コ ユ の 追撃 を か わし 、 と きど き 現 れる オレ ンジ は ボー ナス 


ドッ ト を 1 つ 残 6 ら ず 食べ て し まう 。 フル ー ツ 。 で 6、 こ の うえ を グラ が 退 
る と だ た だ の ドッ ト に も どっ て し まう の 
の の と らら の も ちあ 
ん に 人 人 WW る さてと 。 
面 を クリ ア し て いく 
と 。 ジッ ク グ の 仙 が 変わ 
り 、 オ レン ジ の 数 も 増 
えて 難し く な っ て いく 
で ら 

が に 8 則 つ が まる 
と ゲー ム オ ー バ ー。 リ 
ブレ アレイ し だ いと き は 、 
[Y キ ー を 押 を そう 。 


ei 


。 。2 革 問 半 wm こ マ ロ ー か 1 
江間 YY So の oo の 前 直 。 時 混 苦 


「V〉2H』」 「Q ァ ミーー ビ で 』 


1 持 
年 つ 
HH 
5 い 
ケ る 
月 機 
種 
今 は 

F 
P M 
に 半 
4 
で 
トマ 
よ イ 
楽 は 


|. 憎 〇 如 陸中 ささ FmSm ら 立 居 型 


一 変数 リス ト 

月 be た NT スグ 

YUJIC)……YUJIMAN キ 、 
ャ ラク 2 ' 較 YUJI GAME part.1 男 

OTACO%( )…… だ こ や ん キ 6 男 COPYRIGHT BY BACKS 画 


ラク タ 
JI%( )……SPACE キ ャ ラク フタ 
FUR%( )…… ポ イン トキ ャ ラ 


69 DEFINTA-Z:HI=1999:COLOR7.4:WIDTH49.25:PLAY"V15T255":DIM YUJIX(98) 、OTACO%(98 ) 
JI%(98) .FUR%(98) ,FLT%(98 ) 

79 ' 還 還 還 本 昌 ショ キ セッ テイ 還 還 間 昌 間 

89 FOR I=9 TO 6:COLOR=(1,9):NEXT:GOSUB 849 

99 GOSUB899 '@@ TITLE SUB GOSUB @ る 


2 ダ 199 MAN=3:ROUN= 9 : ROUND= 1 : SC=9 
Oo xss オト ルッ ツジ エキ ヤラ 119 COLOR9 ,4:CLS:RS=19- (ROUND-1):IF RS<9 THEN RS=RS+1 
FLT( ) と | 129 COLOR=( 1 .ROUN) : COLOR=( 4,7 ) 
の ん 139 LINE(9,1 )-(39,24) ," 較 "1.B:FOR IT=4 TO 24 STEP6:FOR J=3 TO 39 STEP 8:LINE(J,!) 


-(J+5。1+3) 。" 國 "1.BF:NEXT:NEXT:LINE(9、22)-(39.23) ," 還 "1.B 
MAN……YUJI MAN の 数 “ 加 


タッ 


149 FOR 1=16 TO 699 STEP 128:FOR J=16 TO 179 STEP 16:PUT@A( 1 エ ,J)-( 1 エ +31 。J+15 ) ,FUR% 
, PSET : NEXT : NEXT 

159 FOR 1=16 TO 179 STEP 48:FOR J=16 TO 699 STEP 32:PUT@A(J。T)-(J+31 ,1+15) 、FUR%, 
PSET : NEXT:NEXT 

169 SYMBOL(39 ,189 ) "PLAYER" ,3,1 .7:MA=9 

179 FOR I=399 TO 698 STEP 32:MA=MA+1:IF MA=MAN THEN 189 ELSE PUT@A(I,178)-(I+31, 
178+15 ) ,YUJI%,PSET : NEXT 

189 LOCATE1 ,9:PRINTUSING"SCORE・ 柱 提 失 韻 寺 HI-SCORE・ 提 音韻 寺 ROUND・ 拉 "1:SC:HI:ROUND 

199 PLAY"L804CCCCFFDDEGFFCDAAAAAA":FOR TI=9 TO 5999:NEXT 

200 ' 還 還 昌 間 昌 間 間 間 本 昌 MAIN LOOP 男 還 還 間 間 間 昌 間 間 

2Z19 X=16:Y=169:A=528:B=16:R=1 :MSS= 1 : POI=9:SD=3:RANDOMIZE TIME 

229 IF INT(RND( 1 )xRS)=9 THEN GOSUB 479 

239 PUT@A(X,Y)-(X+31 、Y+15) ,JI%,PSET 

249 IF POI=195 THEN 739 

259 A$=INKEY$:IF A$="6" THEN SD= 1 

269 IF A$="4" THEN SD=2 

279 IF A$="2" THEN SD=3 

289 IF A$="8" THEN SD=4 

299 ON SD GOSUB 429,439,449,459 

399 PUT@A(X,Y)-(X+31 ,Y+15) ,YUJIX、PSET 

310 IF MSS= 1 THEN PUT@A(A,B)-(A+31,B+15) ,FUR%,PSET ELSE IF MSS=2 THEN PUT@A(A,B) 
-(A+31 ,B+15) , JI%,PSET 

329 IF MSS=3 THEN PUT@A(A.B)-(A+31 、B+15) ,FUR% ,PSET : PO!I =PO1 - 1 

339 IF A<X THEN A=A+32:GOSUB589 : GOSUB529 

349 IF Ax>X THEN A=A-32:GOSUB599 : GOSUB529 

359 IF B く Y THEN B=B+16:GOSUB699 : GOSUB5260 

369 IF B>Y THEN B=B- 16:GOSUB619 : GOSUB529 

379 PUT@A(A,B)-(A+31 ,B+15) ,OTACO%, PSET 

389 IF X=A AND Y=B THEN GOSUB 639 

399 IF X=592 THEN GOSUB 779 

499 GOTO 229 ' Main Loop End !! 

419 ' 還 還 還 昌 詳 較 本 間 SUB 10OT INE 男 還 間 症 還 還 

429 X=X+32:GOSUB549:PLAY"L6404CDE" : R= 1 : GOSUB599 : RETURN 古 軒 MOVE SUB 蘭 軒 

439 X=X-32:GOSUB559 :PLAY "L6404CDE" : R=2:GOSUB599 : RETURN 

449 Y=Y+16:GOSUB569 :PLAY"L6404EDC" : R=3:GOSUB599 : RETURN 

459 Y=Y-16:GOSUB579:PLAY"L6404EDC" : R=4 :GOSUB599 : RETURN 

469 SC=SC+39:LOCATE7 ,9:PRINTUSING "林寺 杜 #" SC:PLAY "L1606CEDC" : RETURN 還 田 オレ ン シ ` 回 男 
479 EF=INT(RNDX16)+1:FE=INT(RNDx4 ) :EE=EFx32+16:FF=FEx(16x3)+16 

489 IF POINT(EE+16.FF+7)=-1 THEN RETURN 

499 PUT@A(EE,FF )-(EE+31 .FF+15) ,FLT%,PSET : RETURN 

599 IF POINT(X+16,.Y)=- 1 THEN 469 ' 還 較 ショ ウ カ ` イ フ ^ ツ SUB 斑 還 

S19 IF POINT(X+15.Y+7)=-1 THEN POI=P0I+1:SC=SC+5:LOCATE7 ,9:PRINTUSING" 柏 提 半 半 "1SC: 
PLAY"L6405DEC" :RETURN ELSE RETURN 

S29 IF POINT(A+16,B)=-1THENMSS= 3 : RETURN 

S39 IF POINT(A+15,B+7)=-1THEN MSS=1:RETURN ELSE MSS=2:RETURN 

549 IF POINT(X+18.Y)=-1 THEN X=X-32:RETURN ELSE RETURN 

S59 IF POINT(X.。Y)=- 1 THEN X=X+32:RETURN ELSE RETURN 

S69 IF POINT(X,Y)=- 1 THEN Y=Y-16:RETURN ELSE RETURN 

579 IF POINT(X,Y+8)=-1 THEN Y=Y+16:RETURN ELSE RETURN 

S69 IF POINT(A+18.B)=-1 THEN A=A-32:RETURN ELSE RETURN 

599 IF POINT(A、B)=-1 THEN A=A+32:RETURN ELSE RETURN 

699 IF POINT(A,B)=-1 THEN B=B-16:RETURN ELSE RETURN 

619 IF POINT(A,B+8)=-1THEN B=B+16:RETURN ELSE RETURN 

629 ' 証 還 還 本 昌 GAME OVER SUB 還 還 還 

639 PLAY"V15L6402CDEFG" 

649 FOR 1I=9 TO 899:NEXT 

659 PLAY"V1503L4C02BAGFEDC" :MAN=MAN- 1 

669 IF MAN=9 THEN 689 

679 FOR I=9 TO5999:NEXT:GOTO 119 

689 SYMBOL( 39 , 89 ) , "GAME OVER" ,8,4.9 

699 IF SC>HI THEN HI=SC:SYMBOL( 329 , 129) ,、 "HIGH SCORE" 3,2.9 

799 COLOR=( 1 .7) :A$=INKEY$ 

719 IF A$="Y" OR A$="y" THEN 99 ELSE IF A$="N" OR A$="n" THEN FOR I=9 TO 7:COLOR 
=(T,T):COLOR7.9:CLS:PRINT "END ! "EEND 

729 GOTO 79 り ' 証 較 本 本 間 ROUND CLEAR SUB 還 還 還 間 昌 時 

739 CLS:ROUN=ROUN+ 1 : ROUND=ROUND+ 1 : IF ROUN=8 THEN BEEP:SC=SC+ROUNDx199:ROUN=9 

749 SYMBOL(9,89), "ROUND CLEAR",7,4.6:COLOR=(4,9) 

759 PLAY"T189L805GGGAGGO06CCO05BBAAGGGGGGFFFFFFEEEER64EEDDCCDDEEEEEET255" 

769 FORI=9TO8999:NEXT:GOTO 119 ' 還 還 還 還 還 間 WARP SUB 還 還 間 還 

779 PUT@A(X.Y)-(X+31 .Y+15) ,JI%,PSET 

789 X=16:PLAY"V15L6405CDEFGAB" : GOSUB599 : RETURN 

799 ' 還 還 還 間 本 TITLE SUB 回 還 昌 昌 寺 

899 COLOR7 .9:CLS:SYMBOL(39 59 ) , "YUJI MAN",9.5.6 

819 LOCATE8.29:PRINT"HIT ANY KEY TO START !!": 

829 IF INKEY$="" THEN 829 ELSE RETURN 

839 ' 還 還 還 本 間 CHARCTAR SUP 還 還 較 

849 LOCATE15,.12:PRINT"DATA READ":FOR 1=2 TO 95:READ YUJI%( 1 ) :NEXT 

959 DATA 31,-32768,.51 1 ,-1924,511,-1924.9.9.9.9,.9,9,9,9,0,9.0.0.0.0.9.9,0,.9.9,.9.9 
・9.9.9、9.9,31、-32768,511,-1924.511、-1924 

869 DATA 415,15369,462.31744.2947,-1924,2947,-2948.255,-2394 511.-1984,1923,-729 
・1923,-616,.9.9.9.9.9.9.9.9,-64.16383,-993,-32257 ,-513,-513 

879 DATA -513,-513,-699.15871 , -3634 .32255 , -2949,-513,-2949,-1925,-271 ,-3841,-769 
5,-1985。-13313,-1999,-25691 ,-1917,-2948.3,-49.16383、-2933,511,-1,-1 

889 FORI=33TO95:READ OTACO%( 1 ) : NEXT 

899 DATA 9.31、-256.255。-16 1923。-8.2944,-2.2935,-2、1999,-2.32767,-2.32767、-4。327 
67,-8.1923、-16.8191.-4.32767,。-2,-97,-7169,-481 ,-16257 

999 DATA 9,9,-1,-1、-32.255,-256,15,-1924.7,-2948.1,-2948,1 ,-2948.1 ,-32768.1、-327 
68.3,-32768.7,-1924,15,-8192.3,-32768,1.96.7168,489,、16256,-1,-1 

919 GETQA(9. り )-(31.15) ,JI%.G 

929 CIRCLE(16.9).16.6,,、,F:CIRCLE(16.9).16.9,,,。N:LINE(15.9)-(17.2) ,PSET , 9 , BF 
939 PSET(19.6.9):PSET(19,19、9):PSET(29.15.9):PSET(7.8.9):PSET(25.8.9):PSET(15,19 
・8):PSET(8.13.9):CIRCLE(25.2).8.5、.2。,.F:CIRCLE(25 2 ) ,8.9,.2,,,N:GET@A(9、9) -(31, 
15 ) ,.FLT%,G:CLS 

949 CIRCLE(16.8) ,4.2、,。、F:GETQA(9、9)-(31.15) ,FUR%、G:COLOR9 .9:CLS:FORI=1TO6 :COLOR 


=(】.T):NEXT: RETURN 

ERU 還 症 Uopoo〈u。 
969 " 較 All BASIC Program 副 
EEAD 衣 間 ho WW〔5〈#※@ 


バン 
ん 


OUONSsw ラ ウン に カラ ー 
ROUND…… ラ ウン ド 数 


RS…… オ レン ジ の 出る 量 
XY……YUJI MAN 座 標 
ALB…… だ こ や ん 座標 
R……MOVE 用 ON GOSUB 
タダ 
MSS…… ポ イン ト 、 ス ペー ス 、 
オレ ンジ 識別 用 
POI…… ポ イン ト の 数 
SD……YUJI MAN 進 行 廊 向 
デー タ 
A や 時 て と キー 人 入力 用 
EF,FF…… オ レン ジ 座 標 
田 プ ロブ ラム の 説明 
10~ 50 REM 文 
60-100 初期 設定 1 
110-190 初期 画面 作成 
210 初期 設定 
220 オレ ンジ 出現 判断 
230 YUJIMAN を 消す 
240 面 フ リア 判断 MIl 
250~290 キー 入力 ざ 
300 YUJI MAN 表 示 5 
310~320 た こ や ん を 消す NN 
330~ て 360 た こ や ん を 動か す 潤 
370 た こ や ん 表示 
380 GAMEOVER 判 断 
390 ワー ブ 判 断 
410-450 MOVE サ ブル ー チ 
ッ ンク 
460~490 オレ ンジ サブ ルー チ 
2 
500-610 障害 物 サ プル ー チ ン 
620~-720 GAME OVER サ 
ブリ ルー チッ 
730~760 面 フ リア サブ ルー チ 
ン 
770~ て 780 ワー プ サ ブ ルー チン 
790~820 タイ トル サブ ルー チ 
ン 
830~940 キヤ ラフ タデ ー マ 
田 チ ェ ン フ ボ イン ト 
だ たこ や ん は 、 角 を ワー プ す る 
の で 、 面 フク リア は な か な が 難し 
い 。 せ め て 、 面 クリ ア 時 に YUJ 
IMAN を 1 人 増やし て は どう か 
な 。740 行 の 最後 に :MAN=MA 
N+1:F MAN〉 5 THEN M 
AN= ら と し まし よう 。 それ か 
ら 、 リ プレ イ の 表示 が な い の で 、 
700 行 の 最後 に :SYMBOL(250, 
150 REPLAY (Y ン NP" 
3.2.O と 入れ て お きま し よう 。 
支 バ ッ チ リ 賞 。 


エミ ー 心 アス キー (会 03-486-7111) PC-8001, mk II プ 8801,mk IT つ 5 イ ンチ ディ スク Y\4.,800 合コン ピュ ユー を 頭脳 と 3 
する エミ ー ち や ゃ ん に 言葉 を 教え 、 会 話し て いく ニュ ユー タイ プ の アド ベン チャ ー。 彼女 の 気分 次 第 で ムフフ ウス タイ ル に ……。 


WW 


WW 
生 UM 


て この COUNT が 0 に な る と 、 ア タッ 
カー が あと 何 機 残 っ て いて も ゲー ム オ 
ーー に が っ て し よう の だ 。 

し た り 小 さく し た り し な が ら 高 度 の 一 敵 を や っ つけ た と き の ポ イン ト は 、 


致し た と ころ て 攻撃 し な いと 効果 が な 5 30 点 の 範 胃 で ラン ダム に スコ ア に 
い の だ 。 も ちろ ん 、 敵 の 攻撃 を 、 高 度 加算 きれ る 。 高 得点 を あげ る に は 、 運 
遊び 方 を 当たる さと て よる こと も て きる ゐ 。 も 必要 と いう こと だ 。 
キー は [2|4|6]8l。 左 右 の 移動 記 4I6 ト 敵 の 高度 に あわ せ て 大 きく な っ た り 
SPACE ATTACK シ リー ズ 、 1 、 高度 を 変え る の 旭 2| (下がる )、[8| (上 小さ く な っ た り 0。 宇宙 の 広がり を ちょ 
2 に 続く 第 3 弾 ( ほ い っ て も 1、2 は が る )。 ビー ム は スペ ー ス ・ キ ー が だ 。 っ ぴり 感じ きせ て くれ る ゲー ム だ 
発表 し て な いけ ど ね )。 アタ ッ カ ー は 3 機 あり 、 ー 


一 見 、 ふ つう の スペ ー ス ・ シ ュー テ 全部 や られ る と ゲー ム オ ー 
ィング ・ ゲ ー ム に 見 える けど 、 ひ と 味 。 バー だ 。 


違う グラ フィ ッ ク が 決め 手 。 も うい ひと つの 、 で も 00NT6 
敵 の 不思議 な 飛行 物体 は 3 段階 の 大 。 表示 きる れ た 数 が ある 。 
きる て 変化 する 。 実 は この 大 きる が 高 これ は 、 最初 240 秒 で は じ 


度 を 表し て いて 、 キ ミ も 自 機 を 大 きく まり 、 ビ ー ム を 撃つ た びに 
2 秒 ず つ 減 っ て いく 。 そし 


マ まだ 命中 。 ち えつ 、 で も 
だ つ だ の 10 点 。 ケ チン ツ / 


ぐつ だ / 


人 
HOE4 


. 


SO 旗 # 


一 。 上 〇 


53 


トー 
4 


| 1 

| 年 
8 

| 9 
月 


4 COMNT # 


39 
を TICKER # 


の き 8 燈 HrYH で 
桂 送 月 。 隊 憶 汰 / さ %% 議 功 ロ の 避 半 当 鹿 


、 癌 び 琴 8 補 麻 。 油 員 田 閉 選 外 


。 うけ 落 。 ロ キ @ 陣 其 / ホ Y き 


8 ぶ 
3 


440 
F:PUT@A(X,Y)-(X+23.Y+1 1 ) ,E1%,PSET 


459 


REM  ) て うれ) け ル )( う て ひも) て JJ) て (は ()()【)() う (1) て )1()()( け (て よ て ) て )1) け {)() 

REM て {} }( 

REM }{ ら PF 衣 を E ATTACK 3 {} 

REM て {} }( 

REM }( 9 は 、 ッ J 9 9 2 By 、 の っ 9 { } 

REM {} } て 

KEM キナ ん た よ ( よ ()1)()() け 1 )1) け 1)11)()( う パ )( は () て )( )()()1 け て )( け 《) 

の em この は たら コン コー INITIALIZE 

SCREEN 7,7:COLOR 3.9:WIDTH 89,25:RANDOMIZE TIME:DEFINT A-Z 


FOR S=9 TO 199:PSET (INT(RNDX649) ,INT(RNDx299 ) , INT(RNDX5+2 ) ) : NEXT 
DIM A1%(55 ) ,A2%(95) ,A3%(169),E1%(55) ,、E2%(95) ,E3%(169 ) ,S%(169):H=9 
SYMBOL (29.89) , "SPACE ATTACK" 4.3,1:SYMBOL (599,79), "3"。8.6,1 
SYMBOL (24.82), "SPACE ATTACK"。4.3.2:SYMBOL (592.72). "37.8.6,2 
SYMBOL (399.156), "By ウー が ゲ ウ "。3,1。1 

SYMBOL (24.82) 。"SPACE ATTACK" ,4.3.3:SYMBOL (592.72) "3".8,6,3 

FOR L=9 TO 53:READ A1%(L):NEXT:FOR L=9 TO 95:READ A2%(L):NEXT 
SYMBOL (29.89) , "SPACE ATTACK",4.3.6:SYMBOL (599,79) "3",8.6,6 
SYMBOL (24.82) "SPACE ATTACK",4.3。4:SYMBOL (592,.72)、"3".8.6,4 

FOR L=9 TO 157:READ A3%(L):NEXT:FOR L=9 TO 53:READ E1%(L):NEXT 
SYMBOL (29.89) , "SPACE ATTACK",4.3,7:SYMBOL (599,79)."3".8.6,7 
SYMBOL (24.82) 。 "SPACE ATTACK",4.3.5:SYMBOL (592.72) "3".8.6,5 
SYMBOL (392,.151) "By ウ - ゲ ウリ 3,1.5:FOR L=9 TO 95:READ E2%(L):NEXT 
FOR L=9 TO 157:READ E3%(L):NEXT:COLOR 5,9:CLS 

LINE (472.9)-(639,199) ,PSET,2.B:LINE (475,.2)-(636,197) ,PSET, 7,B 
SYMBOL (485.7), "SPACE" 。2.2.1:SYMBOL (495,.24) ,、"ATTACK "2.2。1 

SYMBOL (482.9) "SPACE" ,2.2.3:SYMBOL (492.,26) ,、"ATTACK" ,2.2.3 
SYMBOL (595.80)。、 3 "5.5.T5SYMBOL (592.10)、 3".5.5.6 

LOCATE 62.7:PRINT "% HI-SCORE %"5:LOCATE 62.11:PRINT "% SCORE ※": 
LOCATE 62.15:PRINT "% COUNT %"i:LOCATE 62,.19:PRINT "% ATTACKER ※"* 
FOR S=9 TO 59:PSET (INT(RNDx479) , INT(RNDx299 ) 、INT(RNDx6+2 ) ) : NEXT 
LOCATE 29.12:COLOR 3:PRINT "HIT ANY KEY!"::T$=INPUT も (1 ) 

ご me の こら どど GAME START 

LOCATE 29.12:PRINT SPC(12)::P=9:A=3:B=230 :C=1:T=9 

LOCATE 72.9:PRINTUSING " 提 持 "5HELOCATE 74.13:PRINT P・:LOCATE 74.21:PRINT Ai: 
PUT@A(B,177)-(B+31.192).A2%。PSET:TIME$="99:99:90" 
X=RNDX439:Y=RNDx159:Z=1:PUT@A(X,Y)-(X+31 ,Y+15) .E2% PSET 

IF 249-TIME-T く 9 THEN LOCATE 75.17:PRINT "9"::GOTO 899 

LOCATE 73,17:PRINTUSING "本 拓 拓 "1249-TIME-T 

S0UND 9,32:SOUND 1.1:SOUND 2.238:SOUND 3.9:SOUND 4,122:SOUND 5,9:SOUND 7,63 
S0UND 8.16:SOUND 9,11:SOUND 19.9:SOUND 11.8:SOUND 12,.1:SOUND 13,8 
PSET (INT(RNDX479 ) ,INT(RNDx299 ) , INT(RNDx6+2 ) ) 
E=RNDX39-15:F=RNDx29-19:G=RNDx2-1:1F Y+F<9 OR 155<Y+F THEN 479 

IF -1 く <Z+G AND Z+G く 3 THEN Z=Z+G 

IF Z=9 AND -1<X+E AND X+E く 431 THEN PUTQA(X,Y)-(X+39.Y+29) ,5%,PSET:X=X+E:Y=Y+ 


IF 2Z=1 AND -1 く <X+E_ AND X+E く 431 THEN PUT@A(X,Y)-(X+39.Y+20 ) ,S%,PSET : X=X+E:Y=Y+ 


F:PUT@A(X,Y)-(X+31 ,Y+15) ,E2%, PSET 


469 


IF Z=2 AND -1 く <X+E AND X+E く 431 THEN PUT@QA(X,Y)-(X+39,Y+29) ,S5%。PSET : X=X+E:Y=Y+ 


F:PUTQA(X,Y)-(X+39,Y+29 ) ,E3% , PSET 


479 
489 
499 
S99 
So19 
S っ 2 
ゃ 1/ 
S49 


IF INT(RNDX19)=2 THEN 559 ELSE IT$=INKEY$:IF I$="4" THEN D=-19 

IF I$="6" THEN D=19 ELSE IF I$="8" AND C<2 THEN C=C+1 

IF (1I$="5" OR I$="2") AND 9<C THEN C=C- 1 
PUT@A(B,175)-(B+39,195) ,S%,PSET: IF -1<B+D AND B+D<431 THEN B=B+D 
IF C=9 THEN PUT@A(B,189)-(B+23.191),A1%、PSET 

IF C=1 THEN PUT@A(B,178)-(B+31 ,193) ,A2%,PSET 

IF C=2 THEN PUT@A(B,175)-(B+39,195 ) , A3%, PSET 

IF 1$=CHR$(32 ) THEN 739 ELSE 379 


559 ' ------ーーーーーーーーー U.F.0.'S BEEM 


S69 


o79 


S69 
599 
699 
619 
629 
630 
649 


FOR L=9 TO 3:PLAY "V9T24905C16D16E16":NEXT:FOR L=9 TO 599:NEXT 

IF の =0 THEN LINE (XX+12.Y*13)-(X%f12.199) ,PSET ,6 

1F Z=1 THEN LINE (X+16.Y+17)-(X+16.199) ,PSET.,6 

IF Z=2 THEN LINE (X+19,Y+22 ) -(X+21 ,199 ) ,PSET , 6 , BF 

BEEP 1:FOR L=9 TO 599:NEXT:BEEP 9 

IE Z=9 THEN LINE (X+12.Y+13)-(X112.199) ,PSET.p 

TFP 2 の =1 THEN LINE (X116.Y+17)-(X116.199) PSET,0 

IF Z=2 THEN LINE (X+19.Y+22)-(X+21 .199 ) ,PSET , 9 , BF 

BEEP 1:IF Z><C THEN BEEP 9:GOTO 379 

BEEP 9:IF Z=9 AND B<X+12 AND X く <B+12 THEN 680@ 

IF Z=1 AND B<X+16 AND X< く B+16 THEN 6809 

IF Z=2 AND B く <X+20 AND X く B+20 THEN 689 ELSE 3769 

FOR L=3 TO 13: BEEP 1:CIRCLE (B+15.185),L,6,RND:FOR R=9 TO 59:NEXT:BEEP 9 
FOR S=9 TO 299:NEXT:NEXTEA=A-1:IF A=9 THEN LOCATE 74.21:PRINT Ai:GOTO 899 
PUTQA(B,175)-(B+39,.195) ,S%, PSET :B=239:C=1:PUTQA(B,178)-(B+31 ,193) ,A2%,PSET 
LOCATE 74.21:PRINT Ai EGOTO 379 

BPIENEOR993ー の 5 BEEM FIRE! 

SOUND 7,56:FOR L=9 TO 399:NEXT:SOUND 7.58 

1F し に =0 TUMEN LIME (BfF12.1799-(B ナ サナ 12 0) PSBT。3 

IE 6 ヨコ 1 THEN LINE (Bt16、177)-(B+r16.0)。PSET 3 

]F C=2 THEN LINE (B+19。174)-(B+21.9)、PSET.3、BF 

』 ミ エキ + キ 235S0UDND 7、63:1F C=9 THEN LINE (BY12Z.179)-(B+12.、09) ,PSET 、9 

IF C=1 THEN LINE (B+16,177)-(B+16.9) ,PSET .9 

1 ドド し =2 THEN LINE (B+19、174)-(B+21.0). PSET. り 9.BE 

IF C><Z THEN 379 ELSE IF C=9 AND X<B+13 AND B く X+12 THEN 839 

IF C=1 AND X<B+17 AND B く <X+16 THEN 839 


ー ミ ング へ プラッ クオ ニク ス II フ ァ イ ヤ ー ク リス タル へ BPS (会 045-421-7421) PC-8801, mk II (9801 用 も 近日 発売 予定 ) 〇 テー 
た プ \4.800、5 イ ンチ ディ スク Y\7.,800 欠 前 作 の 戦士 を 使い 、 魔 法 の 要素 を 加え だ 続編 (た だ だ し 前 作 の ソフ ト が 了 め 要 )。 


SPACE ATTACK 3 リス ト 続 き 


829 IF C=2 AND X<B+21 AND B く <X+29 THEN 839 ELSE 379 

839 FOR L=9 TO 19:BEEP 1:FOR R=9 TO 89:NEXT:BEEP 9:FOR R=9 TO 59:NEXT:NEXT 

849 CONNECT (X,Y)-(X+39,Y+20)-(X+19,Y+5)-(X+39,Y+18)-(X,Y+19)-(X+35,Y+20 ) , 2 

859 I=INT(RNDx6+1)x5:P=P+I:LOCATE X/8+.5。Y/8+1:PRINT I::IF P>H THEN H=P 

869 LOCATE 72.9:PRINTUSING " 提 提 揚 #"5HELOCATE 72.13:PRINTUSING " 拉 持 盾 拓 "5P 

879 FOR L=9 TO 299:NEXT:PUT@A(X,Y)-(X+49,Y+209) .5%、PSET:GOTO 369 

889 “= GAME OVER 

899 BEEP 1:SYMBOL (19.89), "GAME OVER",5.3.2:BEEP 9 

999 FOR R=8 TO 19:BEEP 1:SOUND R,9:BEEP 9:NEXT:BEEP 1 

919 SYMBOL (159,119),"SCORE "+STR$(P) ,3.2.6:BEEP 9:T$=INKEY$:LOCATE 25,29 

929 PRINT "HIT ANY KEY!"::T$=INPUT も (1):COLOR 5.9:CLS:GOTO 240 

939 CHARACTER DATA 

949 DATA 16,9,14336,124,9,-512.254.9,-512.254.9,-512.238.9,-14848.139.9.9,16,9.1 
4336 , 49,9,19249,313,131 ,14722,-28871 ,-7521 ,14834,-199,-383,14594,124.9.-4698,16, 
9 ,14336,.56.9,14336,56,.9,14336.56.9,14336.49.9.9,9.9,9 

959 DATA 1,9,3,-32768,7,-16384,15,-8192.31 ,-4996,31 ,-4996,31 .-4996 .31 ,-4996,31,- 
4996,31,-4996,31 ,-4996,31,-4996,.15,-8192,4,16384.9,9,9.9.1.9.3、-32768,7,-16384.6 
>-16384.6,-16384,39,-14336,-32665,-13319@,-32281 ,-12542.-39745,-12359,-24691 ,-123 
92。-25 、-12290 ' 

969 DATA -2999,-14274,-32761 ,-16382,-32761,-16382.38,-14336,.69,39729,1.9,3、.-3276 
8.7,-16384,.7,-16384.7,-16384.7,-16384.7,-16384,7,-16384,7,-16384,7,-16384.7、-163 
84,7,-16384.6,-16384.4、16384.9、9,9,9 

979 DATA 9,4996,.9,56.9.9.31744.9,254.9,1,-256.9、1923,-32768,7,-64,9、2947、-16384。 
7,-64,9,2947,-16384.7,-64.9.2947,-16384,7,-64.9,2947,-16384,7,-64.9,2047。-16384。 
3,-4224,.9,455,9,9,-32256.9.9、9,9、9,9,16.9.9,14336.9,124.9,9,-512.9.238.9,.9,-1484 
8.9,238.9.8 

989 DATA -489,128,.6398、12299,-32712,-456.649,-1794,15874.-31752,-449,-32113,-179 
4,16354,-8,-449,-257,2392,8446,-32769,-489,.649,254,2。-32768,-512,512.254.9,9,-22 
4.9,3971,-8192,9,4996.9,56.9.9.31744.9.254.9.9,-512.9,254.9.9、-512.9,254.9,9,- っ 1 
2.9.254,.9 

999 DATA 9,-512.9.254.9.9,-512,9,254.9,9,-512.9.254.9.9,-4698.9,198.9.9,-32256、9 
59。9.9,9,9 

1999 DATA 398,15,.19176,15993,-1927,-789,-3974.14951.-199.19235、391、-2806.24576.5 
145,-856,3241,16386,8832.398,15,19176,15995.-1927、-789、-3974.14951.-190、19235,2 

93,-2742,26916,.5145,-856,.3243.16386,8832.398、15,19176、15995.-1927,-524.-3974.149 
S ト =226 10235 

1919 DATA 391,-2896,24576,5145,-984.3243,16386 , 8832 

1929 DATA 129,13312.769,14298.3832,14394,15899,14184,31633,15732.1976,16369,-8。1 
6349 , 1399,29899 ,19922,-21848,-529,-16428,32956 .16949,16377,15696,8184,19912,1360 
,5449,168,-22916.8,9,129,13312,764.14298,3832,-18464,15899、14184.31632,15732.197 
8.16360 ,-8 

1939 DATA 16349,5461,21849,19922,-21848,-529,-16428.32969.16949,16377.15696.8184 
,19912.1361,5449,168,19752.8.9,129、13312.764,14298.3832.14394、15899,14184.31632。 
15732,1976,16369,-8,16349,1399,29899 ,19922、-21848、-529,16349、32969,16949.16377.1 
5696,8184 

1949 DATA 19912,1361.5449.168.-22916、8、9.09、9、9,3615.12288、129。-11314.2.-6662,-24 
32.3779。-1287,8223,-22581,32336、15118,31614.26742,4941,15892.-4967、19493.2776.13 
9 り 1 ,17549,-8159.-8214.4768.7647,-11999,2962,-12374.1984.4977.21546.12071,-30940,2 
1525 ,4437 

1959 DATA 29648,2728,-21855.16389,29565,19972、168,19773.9,5396,-22528,2、-32009,0 
8,9,14,7984.9.39931,-12899,737 ,-1396,-32754,-15366,-1769.8193,-13442.2P539.3707 
,32369 .39351 ,-14918,-27412.6442,-23798,-19219,21844,-31529、19975,-5358 

1969 DATA -22243,-8235,2956 ,3791,-21996.15375,-4789,19799,19122,-22444.5377。2184 
9,。-22518,-22358,-23232.1369,21834、-32768,-22486.5376,21.5288、9,643,9,0,9.9、3615. 
12288,129,-11314。2。-6662,-2432,3779.-1287,8223,-39773.31824,.15118,31614,26742,- こ 
8727 16920 

1979 DATA -4967,。19493.2776,1391.17549,-8159、-8214、4769,7647,-11999,2962.-12374、1 
984.4977.21892.12939,-39949.21525.4437 .29648 2729,-21851,16389,29565.19972。168.- 
21995。09.5397 , =22528 , 2 ,-32000、0 
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し 
の 硬 変 数 リス ト wi イス コウ 120-150、 170-180, 200-220 : 550-710 敵 の ビー ム の 表示 と 
(に A1%( )…… ア マッ カー の グラ : P…… ス コア タイ トル 画面 衝突 の 判定 
ノ フィ ッ フ パタ ー ン : |$……KEY IN 用 160, 190,220230. ブラ フィ ッ ・ 720-870 アタ ッ カ ー の ビー ム 
AD A…… ア タッ カー の 数 ク パ ター ン 表示 と 判定 と 処理 
A2%( )…… ア マッ カー の グラ ・ BB…… ア マッ カー の X 只 標 の 読み 込み ・ 880-920 GAME OVER 


240-290 表示 画面 作成 
300-310 星 の 表 示 、 ゲ ー ム ス 


クツ 271 タ ーッ 
(中 ) 


930<1070 キヤ ャ ラク タダ の グラ フ 
イツ ン ウパ ター ニシ の 


OO…… ア ダ ツ カー の 高 さ (大き 
さ ) 


A3%( )…… ア タッ カー の グラ : D…… ア タツ カー の X 座 標 増減 = に 寄 お DATA 
フィ ッ フ パタ マター ン ・ T……TIME と COUNT の 調整 ・ 320 て 360 ゲー ム ス タ ヤー トド 時 の ・ 面 チ エッ フ ポ イン ト 
(大 ) 設定 1 対 1 の 対決 な ん だ けど ボー 
E1%( )…… 敵 の グラ フィ ッ ク ・ XY……: 敵 の 座標 370-380 _ COUNT(TIME 使 ・ ナス ガザ な い の で 、 ボ ー ナ スキ ヤ 
0 ター ラク MV Z…… 敵 の 高 さ (大 き さ ざ ) 用 ) ラフ を 出現 させ て も いい ね 。 
E2%( )…… 敵 の グラ フィ ッ ク ・,F…… 敵 の XX,Y 座 標 の 増減 390-400 _ BACK GROUNUD 自分 の 機 数 は 330 行 の A の 値 
パター ン ( 中 ) G…… 敵 の 高 さ (大 き さ ) の 増減 SOUND な の で 、 ご これ を 大 きぐ し た り 、 
E3%( )… 敵 の グラ フィ ッ ツ ・|…… ス コア の 増加 分 410 星 の 座標 370 行 の IF240- TIME と 380 行 
パ バター シン ) 田 プ ロブ ラム の 説明 420 一 470 敵 の 移動 と 表示 の 240- TIME- 「 の 240 の 値 を 
926( on クラ ノイ ウン ター 10- 70 REM 文 470-540 アタ ツ カ ー の 移動 と ・ 大 きぐ すれ ば 、 長 ぐ く 遊 べ る よ 。 
ン 消 去 用 80-110 初期 設定 表示 廊 バ ッ チ リ 賞 。 
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ここ は キミ の 足 の 裏 の 一 部 を 虫 メガ 


て 見 だ も の 。 ラ フラ ンタ ラ 動 いし て いる エ 
イリ アン は も っ ちろ ん 水虫 南 。 そ れ も 
突然 変異 の 怪物 貢 で 、 な ん と 薬 を ぬる 
キミ の 指 に か みつ いて くる の だ 。 こ の 
放し に が の つかれ が いさ うう まく さけ 
て 、 征 の 提 の 80 欠 以上 に 楽 を ね っ て ほ 
し い 。 移動 は カー ソル ・ キ ー。 水虫 の 
怪物 に つか まっ た ら ゲ ー ム オー バー だ 。 
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中 きす へ 2 の 穴 計 判 隊 。 と w は へ へ ひ 評 
と さき ーー ト て 対人 な SS 民 疫 壮 
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バッ ク の サウ ンド は 
ぬれ ば ぬる ほど 音程 が 
高く な り 、 な ん だ か 興 
次 し て し まう ぞ 。 

80 多 以上 ぬっ た だ たら 1 
ラウ ワン トク リア 。 次 の 
ラウ ンド に 行く の だ け 
れ ど と ど 、 水 虫 の 動き も だ 
ん だ ん は や く 、 星 し く 
だ の を で る の だ 。 サジ 
レイ は | s| キ ー が だ 。 


問 員 
1 二 リ 円 
で 上 コ 
r+ 
ゅ 


*em どど ロ 中 自 


・ 区 コマ ーーー トウ テッ は ロ *= 


し 


ーー 
ゴ C 隔 On ロ T す em OO 


目 コロ 日 コロ ユエ ユ マ 
= 人 目 | 


中 中 ロー = ニー ユー に ニ p ビ (中 コピ 


+ 員 日 
ュー 二 ロ ー」 


TH エコ トコ ョ ョ トー 


1 トコ ーー kTkmlb コ IT 四 還 lk 
ーー キ 


コー 
上 


Me 
日 < 


* キ ロイ lmm Lamm- ト ロ 


1 キキ ュ ゴ ー ト ュ ゴ ニコ ニコ ーー 還 全 
- て ーー 


コキ トコ II "= 


r 
う 
ロ 
3 
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ma 1 か IP・ 


ロマ "mL は マー ーー デーUh ニ ーーー" ネー コロ ビ + 中 
1 HI ロコ の  Q 串 


て て = 叫 ロ ーー ビー 
Te 避 コロ デハ 1 ーーmm CH は は ュ て 


・ て ロ 二 へ 日 "TH ー て 
mumF て Km = で 考 


中 コロ ビー トー "" 


Qi ブイ ビー ホオ キキ デビ デビ ロイ スロ ピ トコ 中 は 


さこ ーー ここ に ルー ms 
ロ へ 「TTO ロロ そ そつ コ == 


CO 
も キー == 


の 
水虫 菌 の 移動 

筐 り 終 わ つ だ か 
プー バツ 
コ ゴア の 表示 


・ 遼 チェ ッ フ ポイ ント 
・ ゲー ム 自 体 は それ ほど 目新し 
・ いも の で は な い の だ けれ ども 、 


画 変 数 リス ト ・ 還 プロ プラ ム の 説明 
S…… ス コア ・ 10- 40 初期 設定 ・110 
M…… 面 数 50-- 60 画面 表示 ・120 
N…… 塗 つた 量 70 キー 入力 ・130 
XY…… 座 標 80 変数 の 設定 と 音 出 
| eee 雑用 有 
VX.VY……: こ れ か ら 進 お 方向 ・ 90 塗 つて ある か を 変数 
RR…… こ れ か ら 進 む 方向 に ある ・ で 判断 

や セラ タ クタ ・100 水虫 菌 に あめ だ つ だ か 


: この ひだ すら 上 昇 する 効果 音 に 、 : 


全 二 0 へ ゴブ ゴロ オビ 交 の = ご ー 思 呈 =eCH 


中 ビデ キロ ゴロ エロ ロー トー 
LTF も Tv 叩 か ビー トー ツア デコ am um 


に ブイ / 
(バブ // コ ゴメ / コ 


水中 出 だ ぞ 、 水 中 出 だ ぞ 、 
コワ イ ゾ 、 イ ツ ヒ ッ ヒ ッ ツー( ご 
の CM ソン グ 知 っ て る ?) 


ーー 貞 | 』 
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・ な ぜ が 興奮 し て し まう の だ 。 そ 
・ れ に この 4 匹 の 水虫 の ウヨ ウヨ 


・ と し だ 動き ザ 、 そ れつ ぽこ て い 


sb 


・ 水虫 が 4 匹 で は ムズ イ と いう 
・ 人 は 、30 行 と 140 行 の 頭 に ある fO 
・ F |= 14tO4: て の 4 を 、 づ に すれ 
・ ば 3 匹 、 つ の に すれ ば 2 匹 と 減り 
ます ぞ 。 娘 バッ チリ 賞 。 
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ほのぼの メル ヘン ダッ ツチ 。 
あん まり ほのぼの し ちゃ つて 
ボー ル に あ だ つ ちゃ いそ う 。 
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E,F,H…… 衝 突 判定 用 

び ( )…… 潜 水 艦 使用 判定 用 
し ……SHIP の 残り 
M……: 潜 水 艦 の 爆発 回 数 


P…… ラ ウン ド 数 
O……BGM ル ー チ ンコ ー ル 用 
R…… ミ サイ ル の スピ ー ド 
S…… ミ サイ ル の 発射 率 
X……SHIP の X 座 標 

遼 プ ロブ ラム の 説明 


〇 > へ パイ スコ ョ ア ・ 
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初期 設定 1 


510 


20-160 キャ ヤラ ンタ 定義 
190-210 ゲー ム 画 面 作成 


220 キャ ヤラ クタ 定義 ・ 
230-370 タイ トル 画面 作成 ・ 
380 初期 設定 
390 キー 入力 判定 
400-410 スタ ー ト - 
420 初期 設定 
430-440 キー 入力 判定 - 
450 敵 ミ サイ ル 消 去 : 
460-470 スプ ライ ト 衝 突 判定 ・ 
480 ・ 
490 
500 ・ 


BGM ル ー チ ンコ ー ル 
雲 移動 

英機 移動 
潜水 艦 秘 動 


520-560 
570 一 600 
610 一 660 
670 一 690 
700 一 /20 
730 一 760 
770 一 630 
640 一 870 
660-690 


敵 ミ サイ ル 移 動 
ミサ イル 秘 動 
英機 、 潜 水 艦 爆 発 
SHI 爆発 

プー ム オ ー/ に 処理 
BGM 

ジジ ン ルーン 圧 

2 プス 

ら SHIP を 1 隻 増やす 


田 チ ェ ッ クボ イン ト 

ご の ま の ゲー ハム は むか し か ら 
あつ だ けど ご 、 こ の M5 の 「 BATT 
LESHIP」 は 動き 8 が な め ら か で 
速い 。BGM、 効果 音 も ちゃ ん こと 


付い て いる 。 そ し て 画面 が きれ 


い だ 。 気 に な つっ だ こと と いえ ば 、 
慰 雷 が 海面 上 に まで 飛び 出す こ 
と ぐら い 。( あ つ 、 ミサ イル だ か 
らい い の か な ぐ ) 

それ と 、 面 が 進む びに つれ て も 
つと 敵 の 攻撃 が いや らし こなつ 
だ ほう が いい と 思う の だ が ……。 
で も 、 い いい 出 来 だ |! 

高 得 点 を 上 げ る に は 、 港 水 艦 
を 1 隻 だ け 残 し て 、 敵 飛行 機 を 
ひだ すら 革 ち 落と す の だ 。 娘 サ 
イコ ユー 賞 / 
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勝負 する わけ 。 [1| で グー の ミサ イル 、 
陽水 ョ キ の ミサ イル 、 民 IC パ ー の ミ 
サイ ル 発 射 。 敵 は ラン ダム 
* ヾ に 形 を 変え 、 色 を 変え る の 
遊び 方 あき の いそ を 。 。 
うう む 、 な ん と な く 不 気味 な スペ ー パー の ミサ イル て 勝つ と ・ 競 
スゲ ー ム じゃ 。 20 点 、 チ ョ キ は 10 点 、 グ ー ー 
貼 軌 キー で ビラ ミッ ド 型 宇宙 船 を あ は 5 点 。、 だ か ら フ パー で 勝っ W ッ 
や つっ て 、 画 面 上 か ら や っ て くる ジャ た ほう が 高 得点 で きる わけ 。 
ン ケ ン 型 UFO を や っ つけ よう 。 も ちろ 敵 が 、 2 回 画面 の 下 まで 
ん 、UFO を 迎え うつ ミサ イル も ジャン 〈 る か 、 宇 宙 船 に あたる と 
ケン 型 。 ミ サイ ル と UFO で ジャ ン ケ ン ゲー ム オ ー 
バー。 リフ" 
レイ は | zZ 。 
文 参考 「 マ 
イ コン BAS 
2 
84.1.『The 正 
十 二 面 体 』 
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eual6 』 に < 


4 ジャ セン ケン ポン / 勝つ を 、 ド ツ カ ー ン / 


画 変 数 リス ト ・ 10100 初期 設定 1 ・ キ ヤラ ・ 180-190 自 機 の 移動 ・ パ ッ フ : 310-330 ゲー ム オ ー バ ー 処 理 
X…… 自 機 の X 座 標 クタ 定 義 の 音 ・ 画 チェッ フ ボイン ト 

'S…… ス コア ・ 110-115 マイ トル 表示 ・ 200-220 それ ぞ れ の 手 の ミ サ : な 、 な ん な ん だ ご れ は ー。 敵 
P…… 敵 の スピ ー ド ・ 120-125 オー プ ニ ン グ イル 発射 ・ が ぐー ちょ き ば ー な ら 味 方 の 弾 
G…… や つつ けた だ 回 数 ・ 130 初期 設定 2 ・ 230 一 240 敵 が 下 ま で 来る か 、 : も ぐー ちよ き ば ーー。 う お 、 ア 
N…… 自 機 の 数 ・ 135 痛 景 、 自 機 の 表示  : 自分 に 当 た つ た ら ゲ : イデ ア で す な あ 、 お も し ろ い 。 
A…… 敵 の キヤ ラフ タコ ー ド  ・ 150 敵 の キャ ラク フタ 変 化 ・ ー ム オー バー へ ・。 ちゃ ん と BGM も 入 つ て いて 
|…… 敵 の Y 座 標 ・ 155 自 機 の 色 の 変化 : 250-270 爆発 の 判断 ・ 楽し < 仕 上 つて いる な 。 

し …… サ ウン ド ・ 160 敵 の 移動 ・ ス ピー ド : 280 メイ ン ル ー チ ン へ も : だ だ 自 機 が の 台 と いう の は ち 
K…… キ ー 入 力 用 変化 どる ・ よ つ と 苦し い 。 増やす の は 簡単 。 
HS…… ハ イス コア ・170 スコ ア ・ ハ イス コア ・ 290 敵 の 爆発 ・ 130 行 に ある :N= の 値 を 増 や 
田 プ ロブ ラム の 説明 の 表示 ・ 300 自 機 の 爆発 ・ だけ さ 。 六 バッ チリ 賞 。 
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デモ も いい ね 。 
サーガ ン ン ー イ 
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KW 49 


(黄色 い ポ イン ト ) あたり を 
照準 ( 十 ) に も っ て き て 、 ス ペ 


ーー ス * 素 ーー て ビーム を 具 ち こ 

ヽ ふ も う 。 ビ ー ム を 6 発 連続 撃ち 

KS 遊び 方 を こ な う か 、 敵 と の 距離 が 0 

リス ト が 短い ./ 動き が は や い / に な っ だ たら ゲ ー ム オー バー。 

お も し ろ い ./ と 担当 の パン プ 激 賞 の 
1 画面 グ ゲロ グラ ム 。 


キャ ラク タ は シン プル だ けど 本 格 的 
1 DEFINTA-Z:SCREEN9 ,9,9:CLS4:CLICKOFF:REPEAT OFF:WIDTH46:INIT 


0 UN ーー ング の 25 BX=109:BY=109: し =9:X=155:Y=95:S=9:ST=9:H=9:POKE&HE,29.12:PRINT'+" 
ー ム な の だ 39 TM=9:IF ST>289 THEN ST=289 
BN 49 BX=RNDx159+59:BY=RNDx199+59:1.=9:V=INT(RNDx19)x18:LOCATE20,12:PRINT"+" 
|214I6I8| キ ー を 操作 し て 、 敵 の 急所 45 FOR I=9 TO 199:PSET(RNDx639 ,RND*199,-(RND< .5)x6+1 ) : NEXT 


59 IFL>159THEN179ELSEP=PEEK(8H2E) :KX=BX:KY=BY :BX=BX-(P=&H34 )*15+(P=&H36 )*15+(RND 
*29-19):BY=BY-(P=&H38 )x19+(P=&H32 )x19+(RNDx19-5):PALET7 7+(RND く 5)%4 

69 POKE&HE,5.8:PRINT"SC"iS,"T"16-TM、"D"i159- し :PALET1 、RNDx4+ 1 

79 PRESET(KX,KY ) :POLY(KX ,KY ) ,H,9,V,9+HtH+H+H , 369+H+H+H+H 

89 PSET(BX,BY,6):POLY(BX,BY ) ,L,2.V,9+L+L+L+ し ,369+ し + し + し + し : 昌 = し : し =L+ST/49+ 1 

99 ON- (P<>&H29 )GOT059:LINE(9,199)-(163.199 ) ,.PSET, 4:LINE(319,199 )-(163.199 ) ,PSET , 
4:SOUND 7,&B11111191:SOUND 9.16:SOUND 12.128:SOUND 3.9:SOUND13.9:COLORW 

199 FOR I=255 TO 9 STEP-19:SOUND 2.1:NEXT 

119 LINE(9,199)-(163,199)-(319、199):COLOR7 :TM=TM1 1 

129 IF (ABS(163-BX) く <L/15)x(ABS(199-BY ) く <L/19)GOSUB 149:GOTO39 

139 IF TM>5 THEN GOTO 179 ELSE 59 

149 SOUND7,&B11911111:SOUND6,19:SOUND12.L:SOUND13.9:SOUND19,16:PALET 1,1 

159 R=RNDx199+69:FOR I=1TOL+L/2 STEP 5:POLY(169,199) , 1 ,RNDX2+1 ,R,」+1,489+1+1 

169 P=I:NEXT:S=S+(299-L/2)/2:ST=S:CLS4 :RETURN 

179 SOUND7,&B11911111:SOUND19 ,16:SOUND12,255:SOUND13,9 

189 FOR I=1 TO 369 STEP 19:POLY(160 ,169) ,1,4,129,9,369:NEXT 

199 CLS:CSIZE 3:LOCATE6,8:PRINT#9 "GAME OVER":KEY 9."":PAUSE 4 

299 LOCATE19,11:COLOR2:PRINT "REPLAY Y KEY ":COLOR7:Y$= INKEY$ も (1) 

219 IF Y$S<>"Y" THEN END ELSE 19 
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画 変 数 リス ト ・ RR…- 爆 発 パ ツー ン の 形 プレ イ あう 店 。 

ロ X…… 敵 の X 只 標 ・ 較 プロ ブラ ハム の 説明 ・ 画 チ エッ フ ボ イン ト ・ 1 画面 な の で あま りつ け 加 え 
BY…… 英 の Y 座 標 ・ 10 一 25 初期 設定 1 ・ 。 お お あーす ご い | ワイ ヤー フレ : る こと は な い ガ が 210 行 が 気 に な 
| …… 距 離 ・ 30- 40 初期 設定 2 ・ 一 ム の 敵 が 3-D で せま つて こる 。・ る な 。 ご これ で は 再 ゲ ー ム の と き 、 
日 …: 滑 去 用 距離 の ダミー : 45 星 表示 ・ 。 この プロ グラ ム 、 ス ピー ド を ・ 大 文字 の "Y” し ガ 受 け 付 け な 
KX.KY…… 英 消去 用 ダミー  : 50 キー 入力 ・ 速く する だ め に 、 い ろ い ろ と 賢 ・ い ぞ 。 IF Y$ く )〉 ヤツ THE 
V…… 英 の 形 ・ 60 スコ ア 、 残 り 玉 数 、 ・ いこ と を や っ て る ぞ 。PEEK(& : N こ を IF INSTRCYy ン ^Y$) 
P…… キ ー 入 力 用 距離 の 表示 ・ H2E) と いう と ころ で キー 入力 ・ =O THEN- と し て みよ う 。 
TM…… タ マ の 数 ・ 70-80 敵 の 表示 ・ を し て いる が 、002EH 番 地 に は : これ で 大 文字 小文字 の ヾ Y” と 
S…… ス コア ・ 90-130 ビーム ルー チン : 今 押さ れ て いる キー の コー ドガ が : カマ カナ の バン の どれ を 押し 
ST…… ス コア の ミー と 難易 : 140-160 敵 の 爆発 ・ 入っ つて いる の だ 。 STICK 関 数 * て も 、OK だ い 。 災 バッ チリ 賞 。 

度 ・ 170-210 ゲー ム オ ー バ パー・! リ ・ を 使う より 、 ち よっ つと ば か の 速 ・ 


レア / 


W 
WNW 


W 
UM い 


こん な ゲー ム 、 よ ぐ 1 画面 で 作れ だ 
も ん だ な あ 。 


切れ 目 が ひと コマ 分 な ら 6[6 
キー で その まま いけ る けれ ど 、 
2 コマ 分 な ら 一 度 落 ち て は い 


ヽ ふ あがり 、 3 コマ 分 な ら |8| キ ー 

遊び 方 で ジャ ンプ し な いと 渡れ な い 。 

自作 の 『JUMP MAN』 を 1] 画面 ブロ だ が だ くち は ん ド の が きだ 
グラ ム に 凝縮 し た ニュ ー バ ー ジ ョ ン 。 し の 床 に 落ち る と アウ ト だ 。 


JUMP MAN を |4I6] キ ー で 左右 に 
動か が も し 。IBIC シャ ンク 。 どん と どん くず 


れ て いく レン ガ の 床 を と び ま わ っ て 、 
19 INIT:CLS4:WIDTH1 :DEFINTA-Z:CLICKOFF:ME=1:GOSUB85:SOUND7,56:SOUND3。5:SOUND2.9 


金 袋 を 全部 ひろ いつ くす ゲー ム だ 。 全 15 X1=X:Y1=Y:IF Y<23 THEN F$=CHARACTER$(X,Y+2) ELSE 75 
時 陸生 2 IF F$=" " THEN IF J=9 THEN V=1:GOTO39 ELSE 39 ELSE J=:V=B 
部 ひろ うと 、 溢 の 面 へ 進む 道 が 屋上 に $ 


25 S=STICK(9) : IFS=6THENH= 1 :M=9ELSEIFS=4THENH=- 1 :M=1ELSEIFS=8ANDF$= " ぶ "THENJ= 1 
叶 くる ぞ 。 39 IFJ=9THEN35ELSEIFJ= 1THENSOUND9,16:SOUND13,1:S0UND12,59:V=-1:J=J+ 1 
35 C1$=CHARACTER$(X+H, Y+V) :C2$=CHARACTER$(X+H, Y+V+1 ) 
49 IFC1$= " ま K"THENJ=9:V=-V:GOT035ELSEIFC2$= "* ま "THENIFJ=9THENV=9 :GOT035ELSEV= -V:GOTO 
3SELSEIFC1$=" 炎 "ORC2$= "%"THENSC=SC+ 19xME:K=K+1 :PLAY999:PLAY"V1505C9DEFGAB" 
45 X=X+H:IF X<1 THEN X=29 ELSEIF X>29 AND (K<15 OR Y>2) THEN X=1 
59 YsY+V:IF Y く 1 THEN J=9 ELSEIF K=15 THEN CGEN1:LINE(31,4)-(39,4),"K":CGEN 
SS LOCATEX1.,Y1:PRINT" と ELOCATEX,Y:CGEN1 :PRINTM$(M) : :CGEN:RX= INT(RNDx28 )+1 
69 RY=INT(RNDx25 ) : IFCHARACTER$(RX,RY) く >"%"THENLOCATERX,RY:PRINT" ": 
65 IFK=15THENPLAY "Cg+C-C" : IFX=38ANDY く 4THENLOCATE19,12:COLOR4 :PRINTME: "ST CLEAR": 
PLAY99:PLAY"04C1EGCEGCFACFA-GDG-GDG+CRB+C5":ME=ME+ 1 :CLS: INIT:GOSUB85:K=9:GOTO15 
79 LOCATE34,19:PRINTSCi :LOCATE35 ,14:PRINTME: :GOTO15 
75 LOCATE12,7:COLOR5 :PRINT "GAME OVER": :PLAY129:PLAY "04A1RE9RERF3ER#G1RA3" 
89 LOCATE19,11:COLOR7:PRINT"TRY AGAIN [Y]":KEY9、"": IFINKEY$(9)="Y"THENRUNELSE89 
85 M$(9)=" 淫 せ 寺 ":M$ も (1)=" ま て 杯 FORI=4T029STEP4 :CGEN1 :LINE(9,1)-(36,1),"* ま ":FORL=9TO 
2:LOCATERNDx6+Lx19+2。1-1:PRINT"%":NEXT :LOCATERNDx25 , 1 :CGEN:PRINT" "5 NEXT ・ 
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95 X=10:Y=22:RESTORE199 :FORI=249T0245 : READD$:DEFCHR$(T)=HEXCHR$(D$) : NEXT : RETURN 
199 DATA 999C1E3C183C3C3D3C3C3E3C18991831999C1E3C18991831 , 7E3C189926E28293623018 
9926E2820362393C3C26E28293,9939783C183C3CBC3C3C7C3C1899188C8939783C1899188C 
195 DATA 7E3C1899644741C9469C1899644741C9469C3C3C644741C9 , 9999999999999999DDDD99 
777709DDDD90999999999999909 ,99931E9999999999181B1E7C7EFFFF7E1818997C7EFFFF7E 
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画 変 数 リス ト が ・ 10 初期 設定 ・ 85- 95 初期 設定 
XY…… 新 ジャ ンプ マン 座標 : SO 〇 …… ス コア ・ 15- 20 足元 を 調べ る ・ 100-105 キヤ ラフ タデ ー タ 
XYIPe 旧 ジッ ンプ マレ 用 MS ラル シク マツ の Y ャ ・ の キー 入力 ・ 画 チ エッ フ ボ イン ト 

標 ラク フタ ・ 30 ジャ ンプ 負 理 ・。 うこ む お 、 よ く ぐ 1 画面 に まとめ 
H…… 水 平方 向 ベ フト ル ・ 上 お …… ジ ャ ンプ マン の 足元 の ・ 35-- 40 移動 先 を 調べ る ・ だ も の だ 。 感心 し て し まう 。 あ 
V…… 垂直 方向 ベ フ トル キャ ヤラ クタ ・ 45-55 移動 ・ と 時 間 制 限 で も 付け れ ば も っ と 
り J…… ジ ャ ンプ フラ グ ・C1$,C2$…… ジャ ンプ マン ・ 60 床 を ぐず す ・ お も し ろく こなつ だ だ ろう けど 、 
RXRY…… く ずれ る 床 の 座 標 の 移動 先 の キ : 65 面 クリ ア 判 定 ・ そう し た ら ま きず 1 画面 に は 納 ま 
M…… ジ ャ ンプ マン の 向き  ・ 及 22S9. を 36 スコ ア 等 表示 ・ ら な か つ だ だ ろう し ……。 文 バ 

・ 還 プロ ブラム の 説明 ・ 75- 80 ゲー ム オ ー バ ー 処 理 * ッ チ リ 賞 ! 


麻雀 秘伝 の パッ クス ソフ トニ カ (会 044-953-2380) OPC-6001(32K).mk II/6601 つ テープ Y\4.200 @ ボ ポン 、 チ ー、 カ ン 、 口 し と 】 
ン 、 リ ー チ な どの 声 が 出る 4 人 対局 式 コ ンピュータ マー ジャ ン 。 
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遊び 方 
送 ス クロ ー ル の カー レー ス ・ ゲ ー ム 
な ん だ けど 、 い ろ ん な 面 が あっ て な か 
な か 楽し め る ぞ 。 
テン ・ キ ー の |4!6| で 車 を 左右 に 動か 
し て 障害 物 れ を よ け 、 次 々 に 走破 し て い 
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ROAD 1 で は 壁 を 抜け 、ROAD2 で 
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田 変 数 リス ト ・180-270 
X1.V…… 車 の 座標 ・280-330 
NOV が の 朋 ど 5 
HS…… ハ イス コア ・340-390 
EX.FX.GX…… 障 害 物 の 座標 
S,AB……ROAD( 環 数 ) ・400480 
X2.Z…… 煙 の 座標 3 
BO…… ボ ポー ナス ポイ ント ・440-550 
田 プ ロブ ラム の 説明 
10- 30 初期 設定 ・560-680 
40- 90 画面 設定 3 
100170 ゲー ム ス タ ー ト ・690-780 
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さん 4 る 


は 岩 を よ け 、ROAD3 で は 水 
の 道 を 抜け 、ROAD4 で は 水 
と 、 水 れつ ぶし な が ら 転 が っ 
て くる ドラ ム か ん を よ け 、R 
OAD5 で は 人 岩 と 禁 走 車 を よ け 
直る の 7 だ 
を そし て 、ROAD 6 は ボー ナス 面 。 

道 の 途 中 に ルビ ー と ダイ ヤ が 転がっ て 


を し を を し や そし や こそ し や そし や ゃ る を 


ト 。 を 
も アア スプ アズ ヘア ャ アヘ デラ アヘ デル と ヘン アヘ シル アヘ も ンプ っ 


2 


うま 0 が PdK 学 と うた し う チ ハア ッ ゲ トブ 


"と うう も る を 3: 
トト プ ミ スプ スプ スッ アス ズミ と ヘア シア ュ トブ て ト 、 る 
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HIGH SCORE 
29669 


"YOUR SCORE 


2 0 っ 


いる の で な る で くだ た くさ ん ひろ ゎぉ お う 。 人 
ルビ ー は 100 点 、 ダ イヤ は な ん と 1000 
点 だ 。 


ROAD を 1 か ら 6 ま て 走破 する と 、 が が SC 計 還 年 SNR 
を の と き の 得 点 の 10 分 の 1 が ボー ナス 4 ゾク ツン 、 い か ガ が に も 冷た そう ね お 氷 / 


に しん アクス され 、 き 


た ROAD1 か ら 繰 り 返 計 

し だ 。 た だ し 、 繰 り 返 計器 

し て いく と 、ROAD2 2902 畑 還 ba 
が だ ん だ ん むず か し く 22 和 26 全て よい 
な っ て くる ぞ 。 SYS 

スク グ と 2/S が ニム 5 の 
は 多い の で 編集 部 で は 9 
嫌 わ れ も の な ん だ けど 、 ペ 
こん な に 面 が ある と や 5 ペ 
つう ば り 楽 し い * ね 。 
メイ ン ル ー チ ン ブル ー チ ン ・ 一 番 最 後に で も :DEFINT A-Z 
ROAD 1 の サブ ルー ・ 790 て 840 スコ ア 表 示 ・ と 入れ て お こう 。 ご これ で スピ ー 
チン : 850-950 エン ド ・ ド が ちょ つと あがる ぞ 。 
ROAD2 の サブ ル ・ 960-1000 ボー ナス ・。 ま た 、 ア イス ブロ ッ フ の 面 が 
ー チ ン ・ 1010-1150 キャ ラク タ 設 定  : 難 か し いと いう 人 は 、440 行 の ヒビ 
ROAD3 の サブ ル ・ 玉 チ エッ フ ポ イン ト ・X〉 16 と EX=16 を それ ぞ れ 15 
ー チ ン ・ いわ ゆる スク ロー ル ゲ ー ム だ : に し て 460 行 の PRINT の スペ 
ROAD4 の サブ ル ・ けど 画面 の 多 さ と 美 し さ (や ) が ・ 一 ス を 1 つ ふ や し て み ま し ょ よう 。 
ー チ ン うけ だ 。 ・ 文 バッ チリ 賞 。 
ROAD ら 5 ら の サブ ル ・ お つと 、 こ うい う ゲ ー ム に 付 ・ 
ー チ ン ・ きも の の DEFINT (変数 を 整数 ・ 
ボー ナス ROAD の サ ・ 型 に する の だ ) が な いそ ぞ 。10 行 の ・ 
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ックス (会 03-366-4345) PC-6001(32K),mk II プ 6601 つ テー プ \3,800 但 エイ リア ン を ドア の な か 


閉じ こめ る 、 ビ ヒット ゲー ム 「『 ド アド ア 」』 の 動き を 改良 し た PC-6001 版 。 


つ 
て 一 


遊び 方 


(スス メー ツク ォ オー スム 」 の チー マン ソン ン ググ 
も 品 ず る みな が ら 、 フ "レイ する と も っ 
と 楽し いか も 。 な か な か ム ス い 。、 ス ペ 
mA の コー デイ ング 720 
[21416I8I で 画面 中 央 に ある 周 準 を 移 
還 き させ ぜ せ 、 セ ョ コ ヒ ョ ゴビ ピ ョ ー ン と 奇妙 
に 動き まわ る 敵 を や っ つけ て くれ 。 ビ 
ー ム は 、 ス ペー ス ・ キ ー が だ 。 

敵 の キャ ラク タ は る す が X 1 。 色 も 
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1: の 
ベビ ご と ざ へ ロコ き ーー ざ は きみ 計 


は さと 4J 准 叶 陵 ※ テ こき へ 融 
と rr せ J 馬 OーX は と SS(( 二 コケ 計 


2 
oN シン ペン で 


WW 


きれ いで カッ コ い い ぞ 。 全 部 で 6 種類 
の 敵 が あり 、 そ れ ぞ れ 得 点 が ちがう 。 

赤い や つ は 500 応 。 た だ し 、 こい 
つ は 近づい て くる スピ ー ド が は か の 3 
借 は や て ぐ て 、 ウ ロ ツ ロロ し て いる と あっ 

と いう ま に や られ ちゃ う ぞ 。 

敵 キ ャ ラ の 変 な 動き は 、 画 面 の 端 に 
行く と ピ ョ ー ン と は ね 
か える だめ 。 慣れ て く 
れ ば この 動き を 予測 で 
きる か ら 、 か えっ て ね 
らい 撃ち に 利用 で き る 。 

ビー ム は 1 機 に 対し 

て 11 発 し か 撃て な い 。 
11 発 全部 は ずれ る と ゲ 
ーー クー で 0 


な ぜ が ガ が 順調 に ここ 
で きだ 。 こう な つ だ ら 、 
目指 せ 、 不 倒 の 大 記録 。 


ら 、DISTANCE ( 英 ま で の 間 離 ) が 
0 に な っ て も ゲー ム オ ー バ バー が だ 。 

再 ゲ ー ム し だ いと よき は 、 ス ペー ス ・ 
キー を 押 そ う 。 

と ころ で 、 こ の ゲー ム 、 作 者 が P.C. 
G. を 理解 し た その 日 に 作っ た ゲーム な 
だ る うそ て そ す 。 

文 参考 「 テ クノ ポリ ス 」8584・4,『STA 
RWARS」 


+†OP 


ら SCORE 


補 


STRR MRRS 


TOP 
9 
ら SCORE 
1 4 の 9 


DISGTRNCE 
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っ ムッ ザ ^ ュ ツア ュ マッ ママ ュ で ギィ < ツィ く マ アッ マタ ェ < マッ スペ スマ ニス 


ドア ィ | 
の C/77 ビ 77 戸 


19 GOSUB419 

29 WIDTH 49:INITECLS4:CLICK OFF:X=12:Y=12:A=INT(RNDx22 ) : B= INT(RNDx22 ) : CFLASH 

39 LINE(9.9)-(319,199) ,PSET,6.B:LINE(299,9)-(299,199) ,PSET,6:K=INT(RNDx199\19) :F 
OR 1=1 TO 49:S=INT(RNDx197+1 ) :D=INT(RNDx197+1 ) : PSET(S,D,7) :NEXT :PLAY5999 


49 COLOR5:LINE(25.9)-(39,24),"X"。B:COLOR6 :LOCATE28 , 2:PRINT "STAR WARS":TI=199 

59 LOCATE27,5:PRINT "TOP" :LOCATE27 ,8:PRINT "SCORE" : COLOR3 :LOCATE27 ,12:PRINT"DISTAN 
CE":LOCATE27.15:PRINT"BEEM" : COLOR4 :LOCATE27.18:PRINT "by .":LOCATE27 ,29:BE= 19 

69 PRINT"Katsushi .T":IF K=<4 THEN H$ も ="IJK" ELSE IF K=5 THEN H$="LMN" ELSE IF K=6 
THEN H$="@AB" ELSE IF K=7 THEN H$= "CDE" ELSE IF K=8 THEN H$="FGH"ELSE H$="OPQ" 
79 COLOR7:LOCATE32 , 6 :PRINTUSING "林間 間 半 "日 1 :LOCATE32 , 9 : PRINTUSING " 村 提 持 #" ? SC 

989 LOCATE34 ,13:PRINTUSING"###" 5TI ELOCATE35 , 16:PRINTUSING "本 "BE:T$=INKEY$( 9 ) 

399 COLOR7:LOCATEX ,Y:PRINT"+":LOCATEA,B:CGEN1 : PRINTHS$ : CGEN 

109 IF I$="8" THEN Y=Y-1:LOCATEX,Y+1:PRINT" " 

119 IF I$="2" THEN Y=Y+1:LOCATEX,Y-1:PRINT" " 

129 IF I$="4" THEN X=X-1:LOCATEX+1,Y:PRINT" " 

139 IF I$="6" THEN X=X+1:LOCATEX-1.Y:PRINT" " 

149 IF STRIG(9) THEN GOSUB199 

159 IF Y=9@THENY=Y+1ELSEIFY=24THENY=Y-1ELSEIFX=9THENX=X+ 1ELSEIFX=24THENX=X- 1 

169 TI=TI-1:IF H$="OPQ" THEN TI =TI- 2 ELSE IF TI<@ THEN LOCATE36 , 13:PRINT"9" 

179 IF TI< く 9 OR BE<9 THEN 379 

189 GOSUB249:GOTO79 

199 LINE(1,198)-(Xx8+3,Yx8+3) ,PSET ,1:LINE(199,198)-(Xx8+3.Yx8+3) ,PSET , 1 

299 PLAY3999:FOR 1=1 TO 5:PLAY"V1508C9" :NEXT :PLAY5099 

219 BE=BE-1:1TF X=A+1 THEN IF Y=B THEN 349 

229 LINE(1,198)-(Xx8+3,Yx8+3) ,PRESET , 1 :LINE( 199, 198)-(XX8+3。 YX8+3) 。、PRESET , 1 

239 RETURN 

249 U=INT(RNDx199\19 ) 
259 IF U=1 THEN A=A-1 
269 IF U=2 THEN A=A+1 


:LOCATEA+1.B:PRINT" 
:LOCATEA-1.B:PRINT" 
279 IF U=3 THEN B=B- 1 :LOCATEA, B+1:PRINT" "・PLAY"V1408CDEF" 

289 IF U=4 THEN B=B+1 :LOCATEA,B- 1 : PRINT" ":PLAY"V1408CDEF" 

2Z99 IF A=9 THEN FOR !=1 TO 19:LOCATEA,B:CGEN1:PRINTH$:CGEN : A=A+ 1 
NT" "・NEXT 
399 IF A=22THEN 
NT" ": NEXT 
319 IF B=@ THEN 
NT" "・ NEXT 
329 IF B=23THEN 
NT" "・NEXT 
339 RETURN 


・PLAY"V1408CDEF" 
・PLAY"V1408CDEF" 


・LOCATEA-1,B:PRI 


FOR !=1 TO 19:LOCATEA ,B:CGEN1 :PRINTH$:CGEN: A=A-1:LOCATEA+ 1 , B: PRI 


FOR 1=1 TO 29:LOCATEA ,B:CGEN1 :PRINTH$:CGEN: B=B+ 1 :LOCATEA, B- 1 : PRI 


FOR 1=1 TO 29:LOCATEA ,B:CGEN1 :PRINTH$:CGEN : B=B- 1 :LOCATEA , B+ 1 : PRI 


349 
359 


FOR 1=1 TO 19:COLOR7 , 2 : BEEP : COLOR7 , 6 : NEXT 
IF _H$="IJK" THEN SC=SC+199 ELSE IF H$="LMN" THEN SC=SC+159 ELSE IF H$= "CDE" 


OR _H$="FGH" THEN SC=SC+299 ELSE IF H$="@AB" THEN SC=SC+399 ELSE SC=SC+599 
369 GOTO29 
379 PLAY599:PLAY"03F5RC5R2C5D7C7R7E7F7 : 05F5RC5R2C5D7C7R7E7F7":PLAY"08":PLAY5999 

389 Q=8:W=9:FOR 1=1 TO 12:LOCATEQ,W:COLOR7 :PRINT "GAME OVER":W=W+1:LOCATEQ, W- 1 :PR 


一 次 数 リス ト 


INT" 
399 
499 
419 
429 
430 
449 
459 
469 
479 
489 
490 
599 
519 
529 
539 
549 
559 
569 
579 
589 
599 


NEXT :LOCATEQ,W:PRINT "GAME OVER" 
IF HI<SC THEN HI=SC 
IF STRIG(9) THEN SC=9: BEEP : GOTO29 ELSE499 
DEFCHR$(&H49 ) =HEXCHR$( "9498181F1F1898949498191F191998949498191F19199894") 
DEFCHR$(&H41 ) =HEXCHR$( "243C66E7FF7E7C84A5BFE4E57C7C3C2424247CFD646464A4" ) 
DEFCHR$(&H42 ) =HEXCHR$( "291998F8F8981929291998F898981929291998F898981929") 
DEFCHR$( &H43 ) =HEXCHR$( "99FF7F3E3E7FFF9969FF99999999FF9999FF99999999FF99" ) 
DEFCHR$( &H44 ) =HEXCHR$( "99FFFF9999FFFF9999FF99999999FF9999FF99999999FF99") 
DEFCHR$( &H45 ) =HEXCHR$( "99FFFE7C7CFEFF9999FF99999999FF9699FF99999999FF99" ) 
DEFCHR$(&H46 ) =HEXCHR$( "FF3C7E7E7E7E3CFFFF397878787839FF993C7E7E7E7E3C99" ) 
DEFCHR$( 8&H47 ) =HEXCHR$( "FF999999999999FFFF999999999999FF9999999999999999") 
DEFCHR$( &H48 ) =HEXCHR$( "FF3C7E7E7E7E3CFFFF397878787839FF993C7E7E7E7E3C99" ) 
DEFCHR$( &H49 ) =HEXCHR$( "898981FFFF99A498898981FF8999BC98898981FF8999A498") 
DEFCHR や も ( 8&H4A ) =HEXCHR$( "993CFFFFFFFF9999923EC9E9FCF89999993CC3FFFF9F9999") 
DEFCHR$( &H4B ) =HEXCHR も ("999989FFFF9925199999997F91193D19919181FF91992519") 
DEFCHR$( &H4C)=HEXCHR$( "9929798888799999FF2179F8F8799999FF91798888799999") 
DEFCHR$( &H4D ) =HEXCHR$( "9999247E6624999999999981C3E718669999998199DB9999" ) 
DEFCHR$ も ( &H4E ) =HEXCHR$( "99949E11119E9999FF849E1F1F9E9999FF899E1 1119E9999") 
DEFCHR$( &H4F ) =HEXCHR$( "1F9C969696969C1F993C7E7E7E7E3C999999999999999999") 
DEFCHR$( 8&H59 ) =HEXCHR$( "81423C99993C428199999918189999999999991818999999") 
DEFCHR$(&H51 ) =HEXCHR$( "F89C969696969CF8993C7E7E7E7E3C999999999999999999") 
RETURN 


だ た ら さ つと 敵 が 逃げ て し まう 。 


初期 設定 ・ 画 面 設定 
ポッ ルル ーー グ 


20- 60 
70 一 160 


あと 、 敵 の キヤ ラフ が 変 つ 
て も 、 動 き が 同じ と いう の は つ 


HI…… ハ イス コア 
X.Y…… 上 準 器 の 座標 
AB Re 敵 の 座標 


190~230 
240-330 
340-360 


に た で だ A 
英 の 動き 
中 


それ か ら BEEM や DSTAN 
CE の 初期 値 が 小さ すぎ て 、 あ つ 
と いう つま に や られ て し まう つ 。 そ 


ま ら な いな 。 そ れ ぞ れ 違 つ 動 き 
を し て ぐれ だ ら す ご い の だ けれ 
ご も 、 そ れ を や つて だ ら プ ログ 


ー の 座標 こ で 40 行 最後 の |=100 を 999 に 、 
50 行 最後 の BE ヒ =10 を 99 に し て 
し まお う 。 こ れ で で き な き や 


コ だ ね 。 


フラム の 半分 ほど を 書き 換え な い 
と な ら な いけ ご ど …。 ど な だ か や 
つて みて は Y 文 ヨッ シャ 賢 。 
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370~ て 400 ゲー ハム オー バー 
410~ て 590 キャ ヤラ 定義 
田 チ ェ エッ クボ イン ト 

せつ が ガ が ぐ 照準 が あつ だ と 思 つ 


思 且 Se 間 
T ト 上 …… ひ DISTANCE 
田 プロ グラ ム の 説明 


レア y み 


RUN る せる と し ば らく は まっ くろ け 。 
みみ 寺 枚 た か が 作 の の と 心配 に な っ て 
きた ころ 画面 が 現れ る 。 ポ ッ ポ ボッ ポ ッ 
と 星 と モビ ルス ー ツ が 出 て きだ た ら 、 ゲ 
ー ム 開始 だ 。 


f 
せ 


| nm ビ S 革 環 調 と 7 


を 
て 
か 
あう 
も 
は 
ゴ 
ン 
の ) 
ト 
リ 
890 
統 
た に 
「 
1 


し 
た 
、26 
、 歳 
の 
- チチ 
ツル 
ン 
ジグ 
・ よ 
^ 
池 
生 
代 
の 


溝 DDorS こ すさ 


画 変 数 リス ト ・ YH…… 敵 の Y 座 標 

A…… キ ャ ラク 定義 用 デー タ ・ RE…… 敵 の スピ ー ド 制御 用 待 
A$…… キ ャ ヤラ クタ 定義 用 ち 時 間 

XS…… 背 景 の 星 の X 座 標 ・ XT…… 次 に 動く 敵 の X 座 標 
YS…… 背 景 の 星 の Y 座 標 ・ YT…… 次 に 動 こ 敵 の Y 座 標 
CS…… 育 景 の 星 の 色 ・ 田 プロ ブラ ム の 説明 

X…… 明 準 の X 座 標 ・120 初期 設定 

Y…… 明 準 の Y 座 標 ・130-210 キャ ヤラ ンタ 定義 
DA…… ダ メー ジ ・ 220-240 ゲー ム 画 面 作 成 
EN…… エ ネル ギー ・250 初期 値 設定 
D$…… ダ メー ジ 表 示 ・260-300 敵 の 出現 
E$…… エ ネル ギー 表示 ・310 敵 の スピ ー ド 制御 
P…… 倒 し だ 敵 の 数 ・320 一 430 敵 の 秘 動 及 び 攻 到 
PX…… 1 面 に 表 わ れ る 敵 の 数 ・440 ビー ム ん 発射 
XH…… 敵 の X 座 標 ・460 得点 表示 


枠 の 外 に ある 三角 形 は 、 ビ ー ム 早 準 
の イン ジ ケ ー タ ー だ 。 こ の 三角 形 を [2| 
[8 [4I6@] キ ー で 移動 きせ 、2 組 の 二 角 
形 を 結ん だ 線 の 交点 を 敵 の モビ ルス ー 
ツ に あわ せ ビ ー ム 発射 。 あ た る と 内 光 
が 画面 を 包み こむ 。 敵 も 接近 し て くる 


470 
460 
490-550 
560-650 


再 ゲ ザー ム ガ 


4 


照準 移動 サブ 
660 一 /20 敵 弾 中 サ プ 
730-660 ビー ム 発 射 サ プ 
690-1900 キヤ ラン 定義 デー 
3 

一 チェ ツン フ ボイン ト 

うーむ 、 と 待 だ され だ と 思 つ 
だ ら 、 届 の 準備 も し な いう ち に 
の ー が 短 ま つう て で し まう た だ 。 こ 
うつ いう の は 不 親 切 だ 。 そ こ で … 
255 TEMPO 2007LOCATE 
17.11:PRINT"FIGHT『 和 FOR 


マ 三 角形 の 準 を ビタ ッ と あわ せ て 。 


各 サ イズ の 敵 の 表示 ・ 


と 攻撃 し て くる ぞ ( 移 の と ころ が 黒く 
な る の が 攻撃 の し る し だ)。 

モネ ルー が 0 に な っ だ り 、 ズ メー 
ジ が いっ ぱい に な る と ゲー ム オ ー バ ー。 
文 参 考 「Oh! MZ」583・4,『PCG EDI- 
TOR プ ログ ラム 』」/ グ の 84・3,『SOUND- 
WICH」 


1=O TO 15:PLAY"06AO+ 
ANEXT:LOCATE17.11: ピ 


RINT" ・ ピ AUSE 
Oo どう か な マ 
それ か ら 470 行 に ある 「HE 


・ N120 ELSE こ は THEN 
・CLS:GOTO 220ELSEー に 
・ レ し だ ほう が 、 時 間 の か か る キヤ 
・ ランタ 定義 を 飛ば させ て いい と 
・ 思う よ ! 


何 度 や つて 「 ふ ん 、 敵 の 攻 


・ 撃 が 里 い 」、 と 感じ だ 人 は 310 行 


に 4 つ あ る 、RE = の 値 を , ご, 


・ 4, の , 1 と 小さ くし て み ま し よ 
2 ムー 


"| | 
39 「'| SPACE COMBAT | 
49 '| | 
59 '| FOR X-1 | 
69 '| | 
79 '| Programed Dy マコ ト | 
89 '| | 
99 '| 1984.3.1-26 | 
199 '| | 
ト す 0 ソニ ーー dg 陸 7 交 0 
129 INIT:CLS 4:WIDTH 49:CLICK OFF:DEFINT A-Z:PRW 
139 RESTORE 8969 
149 FOR I=9 TO 197 
159 A$="“" 
169 FOR J=1 TO 24 
179 READ A 
189 A$=A$+CHR$ も ( A ) 
199 NEXT 
299 DEF CHR$ も (! )=A$ 
219 NEXT 
229 LINE(9.9)-(319.175),PSET,7.B:PALET 1.9:LINE(1.1)-(318,.174) ,PSET , 1 BE 
239 FOR ST=9 TO 89:XS=(INT(RNDx318) )+1:YS=(INT(RNDX174) )+1:CS=(INT(RNDX7 ) )+1:PSE 


T(XS,YS,。CS) : NEXT 
249 COLOR 6:LOCATE 1.22:PRINT "ENERGY > 還 還 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 間 OLOR 3:LO 
CATE 1,23:PRINT"DAMAGE> [FTFTTTTTTTTTLTTTTTTTTTTTTTTT" ECOLOR 7 


259 


3109 


TIME=9:X=19:Y=19:DA=9:EN=154:P=9 

PX=(INT(RNDX6) )+2:FOR R=1 TO PX 

XH=(INT(RNDx5 ) ) x8+3:YH=(INT(RNDx3 ) ) x7+3 

IF CHARACTER$(XH,YH)=" "| THEN 299 ELSE 279 

LOCATE XH.YH:CGEN 1:PRINT#9 ,CHR も (8&H9):CGEN 9 

NEXT 

IF TIME く 129 THEN RE=12 ELSE IF TIME <249 THEN RE=9 ELSE IF TIME く 369 THEN RE= 


6 ELSE RE=3 
329 XT=(INT(RNDx5 ) ) x8+3:YT=(INT(RNDx3 ) ) xX7+3 


339 IFCHARACTER$(XT.YT)=" " THEN329 ELSEIFCHARACTER$(XT , YT ) =CHR$(&H9 ) THEN349 EL 
SEIFCHARACTER$( XT , YT ) =CHR$( &H3 ) THEN389 ELSEIFCHARACTER$( XT ,YT ) =CHR$(&H16 ) THEN4 
29 ELSEIFCHARACTER$(XT, YT ) =CHR$(&H2C)AND(INT(RNDx5 ) ) >1 THENGOSUB669 ELSE429 


349 


469 


P:CLICK ON 
479 LOCATE 12.22:PRINT"REPLAY 2 (Y/N) "ELOCATE 27.22:IF INKEY も (1)="Y" THEN 129 EL 


FOR G=9 TO RE:GOSUB 499 
GOSUB 569 

IF STRIG(9) GOSUB 739 
NEXT:GOTO 329 

FOR G=9 TO RE:GOSUB 519 
GOSUB 569 

IF STRIG(9) GOSUB 739 
NEXT:GOTO 329 

FOR G=9 TO RE:GOSUB 539 
GOSUB 569 

IF STRIG(9) GOSUB 739 
NEXT:GOTO 320 
CLS4:LOCATE 1.9:COLOR 7:PRINT USING" ア ナタ 八 寺 韻 填 井 キ テキ ブ サ ^ キ ツイ シテ チカ ラフ ツキ マシ タ 。 アー メン ": 


し ず を ( 月 


SE IF INKEY$(1)="N" THEN 489 ELSE 479 

489 END 

499 CGEN 1:LOCATE XT,YT:PRINT#9 ,CHR$ も (3) :CHR$ も (4) :LOCATE XT,YT+1:PRINT#9 ,CHR$( 6) :C 
HR$(7):CGEN 9 

S599 RETURN 

S19 CGEN 1:LOCATE XT-1 、YT-1:PRINT 半 9 ,CHR も (18 ) :CHR も (19) :CHR$(29) :LOCATE XT-1,YT:PR 
INT##9 , CHR も (21 ) iCHR も (22 ) :CHR$ も (23) :LOCATE XT-1 ,YT+1 :PRINT#9 ,CHR も (24 ) :CHR も ( 25 ) : CHR$ 
(26):CGEN 9 

oS29 RETURN 

539 CGEN 1:LOCATE XT-2.YT-2:PRINT#9 ,CHR$( 36 ) : CHR や (37 ) : CHR$( 38 ) : CHR$( 45 ) : CHR$ も ( 46 ) 
:CHR$(47):LOCATE XT-2,YT-1:PRINT#9 , CHR$ や (39 ) : CHR$( 49 ) :CHR$ も (41 ) iCHR$( 48 ) :CHR$( 49): 
CHR$(59 ) :LOCATE XT-2。YT:PRINT 拉 9 ,CHR も ( 42 ) : CHR$( 43) : CHR$( 44 ) :CHR$( 51 ) : CHR$( 52 ) : CHR 
$(53) 

S49 LOCATE XT-2 。YT+1:PRINT#9 ,CHR$ も (54 ) :CHR も (55 ) : CHR$( 56 ) : CHR$( 63) :CHR$( 64 ) iCHR$( 6 
5) :LOCATE XT-2,YT+2:PRINT#9 ,CHR$ も (57 ) : CHR$(58 )CHR$( 59 ) : CHR$ も (66 ) : CHR$( 67 ) : CHR$( 68 ) 
・LOCATE XT-2.YT+3:PRINT##9 ,CHR$ も ( 69 ) : CHR も (61 ) : CHR$ も ( 62) : CHR$(69) : CHR$( 79) : CHR も ( 71) : 

CGEN 9 


559 
569 
579 
580 
599 
69 
619 
629 
639 


PRINT"4" ECREV 1:LOCATE 39.Y+1:PRINT"" 


守ら 


RETURN 

ら S=STICK(9) 

IF X>3 AND S=4 THEN X=X-8 

1F X く <35 AND S=6 THEN X=X+8 

IF Y>3 AND S=8 THEN Y=Y-7 

IF Y く 17 AND S=2 THEN Y=Y+7 

CONSOLE 9.25.9,1:CLS:CONSOLE 9,25,39,1:CLS:CONSOLE 

CONSOLE 21.1:CLS:CONSOLE 9,1:CLS:CONSOLE 

LOCATE 9,Y:COLOR 7:PRINT "AM" ECREV 1:LOCATE 9,Y+1:PRINT "4":CREV 9:LGCATE 39,Y: 


へ 判 
メー ス 2 誠 
ー 2 


(2 


《①: 


スー パー ホロ スコ ー プ や 日 本 ファ ルコ ム ( 代 0425-27-4121) FM- 7 /NEW 7 ( 要 漢 字 ROM)/77・PC-8801.mk II 〇 テー プ 6 ア 
\6,800,. 3.5、5 イ ンチ ディ スク \7.800 劉 漢 字 対 応 の 西洋 占星 術 シ ステ ム 。 プ リン で 出力 され る ホロ スコ ー プ が きれ い 。 


〇 


へ 全 S 民 村 へ 由 表 mmmJ 避 へ ざこ て eeett9t し 穫 d の 司 ーHY 壮 に NININId 光 


SPACE COMBAT リ スト 続き 


62 


649 LOCATE X,9:PRINT"M" ELOCATE X+1.9:PRINT"4":CREV 9:LOCATE X,21:PRINT "会 、“ 

659 RETURN 

669 SOUND 9.59:SOUND 1,1:SOUND 6,1:SOUND 7,.8:SOUND 8,16:SOUND 12.1:SOUND 13.10:L 
0CATE XT,YT-1:COLOR 7:PRINT" 語 "LOCATE XT,YTEPRINT" 還 "PAUSE 5:LOCATE XT,YT-1:PE 
INT" 還 較 ":LOCATE XT,YT:PRINT" 還 還 ":PAUSE 5:PRW 255:PALET 1,7 

679 SOUND 1.,1:SOUND 9,.28:SOUND 7,62:SOUND 8,19:SOUND 6,16:SOUND 7,.55:SOUND 8.16: 
SOUND 12.79:SOUND 13.9:PAUSE 19:PALET1.9:PRW 

689 LOCATE XT,YT-1:CGEN 1:PRINT#9 ,CHR$( 41 ) iCHR$(48):LOCATE XT,YT:PRINT#9 , CHR$( 44 
) iCHR$ も (51):CGEN 9 

699 DA=DA+1 

799 D$=STRING$ も (DAxX2," 古 ") 

719 LOCATE 9,23:COLOR 3:PRINT D$:COLOR 7:PAUSE 19 

729 IF DA=15 THEN RETURN 469 ELSE RETURN 329 

739 IF EN<5 THEN RETURN 329 ELSE PALET 1,1:SOUND 9.9:SOUND 1,1:SOUND 6,1:SOUND 7 
8:SOUND 8,16:SOUND 12,1:SOUND 13,19:PAUSE 1:FOR T=9 TO 3:PALET 1.9:PAUSE 1:PALE 

T 1,1:PAUSE 1:NEXT:BEEP 9 

749 EN=EN- 1 

759 E$=STRING も (39-(INT(EN/5)), "ロロ " ) 

769 LOCATE 9.22:COLOR 6:PRINT E$ 

779 COLOR 7 

789 IF CHARACTER$(X,Y =" "| THEN 889 ELSE 

799 IF CHARACTER$(X,Y =CHR$(&H9 ) THEN 899 ELSE IF CHARACTER$ も ( X,Y ) =CHR$( 8&H3 ) THEN 
819 ELSE IF CHARACTER$(X,Y) =CHR も (8&H16 ) THEN 829 ELSE IF CHARACTER$(X,Y)=CHR$( &H 

2C) THEN 839 

899 CGEN 1:LOCATE X,Y:PRINT#9,CHR$( 1):CGEN 9:GOTO 859 

819 CGEN 1:LOCATE X,Y:PRINT#9 ,CHR$( 9 ) iCHR$(19) :LOCATE X,。Y+1:PRINT#9 ,CHR$( 12) :CHR 

$(13):CGEN 9:GOTO 856 

829 CGEN 1:LOCATE X-1.Y-1:PRINT#9 ,CHR$( 27 ) :CHR も (28) :CHR も (29):LOCATE XX-1,Y:PRINT 提 

9 , CHR$( 39 ) : CHR$(31 ) ?)CHR$(32 ) :LOCATE X-1,Y+1:PRINT#9,CHR$(33) iCHR$(34) ijCHR$S(35) :C 

GEN 9:GOTO 859 

839 CGEN 1:LOCATE X-2,Y-2:PRINT# せ 9 ,CHR も (72 ) :CHR も (73) iCHR も (74 ) :CHR$ も (81 ) 1CHR$(82):C 

HR$ も (83) :LOCATE X-2.Y-1:PRINT#9 ,CHR$ も (75) iCHR$(76 ) :CHR$ も (77) iCHR$( 84) j:CHR$( 85 ) iCHR$ 
(86) :LOCATE X-2,Y:PRINT#9 ,CHR$ も (78 ) :CHR$ も (79) iCHR$ も (89 ) )CHR$ も (87 ):CHR$(88) iCHR$(89) 

849 LOCATEX- 2 ,Y+ 1 :PRINT#9 , CHR$( 99 ) :CHR$(91 ) :CHR$( 92 ) :CHR$(99) :CHR$(199) iCHR$(191 
) :LOCATEX- 2 ,Y+2:PRINT#9 , CHR$( 93 )・CHR$( 94 ) :CHR$ も (95 ) :CHR$( 192):CHR$ も (193) iCHR$(194 ) 
・LOCATEX- 2 ,Y+3:PRINT#9 ,CHR$( 96 ) : CHR$(97 ) :CHR$ も (98) iCHR$ も (195) iCHR も (196):CHR$(197): 

CGEND 

859 SOUND 1.1:SOUND 9.28:SOUND 7.62:SOUND 8.19:SOUND 6,31:SOUND 7,55:SOUND 8,.16: 

SOUND 12,.79:SOUND 13.9:PALET 1.9:PAUSE 19:CONSOLE Y-2.6,X-2.6:CLS:CONSOLE:P=P+1 

869 PX=PX-1:IF PX く < く >9 THEN RETURN 329 ELSE 

879 PAUSE 39:RETURN 269 

889 PALET 1.9:RETURN 


899 DATA 9,24,.9,24.9,.9,9,9,24,69,126,36,24,36,66,128,9,24,9,9,9,9,9,9 

999 DATA 9,9,9,9,9,9,9,9,145,147,68,49,147,49,68,211,145,9,9,9,129,9,9,145 

919 DATA 9,.9.9,.9,9.9。9.9.9,9,9,9,9.9.9.9.9,9.9,9,9,9,9,9 

920 DATA 0。1。 12、6.69.95. 8.3.01.3、3.57.0.28、28.12 .0.1.0.2.7.9.2。3 

939 DATA 9,128,48,96,.252,196,192,192。128,192,192.156,.9,56,56,48,9,128,9,64,224, 
9,64,192 

949 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9.9,9,9,9,9,9,9 

959 DATA 14,16,24.64,.96,9,9,9,9,12.32。48,128,192.9,9,9,9,9,9,9,9,9,9 

969 DATA 112.8,24、9 9,9,9,9,.9,48.4,12.9,9,9,9,9,9,9,9.9,9.9,9 

979 DATA 9,9,9,9,9,6@,9,9,9,9,9,9,9,9,9,.9,9,9,9,9,9,9,9,9 

989 DATA 9,9.9,9,9,6,.9,9,227.241.57,.29,.15,7.63,255,139,193,33.17,8.5,32,152 

999 DATA 9,9,9,9,.9,9,.9,9,199,199,149,152,176,.249,239,224,4,71,.8,16,32,17,36,128 
1999 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9.9,9,9,9,9,9,9,9 

1919 DATA 9,9,9,9,9,9,9,9,231 ,143,28,57,113,225,192,128,228,139.16,33,65,129,12 
8,128 

1929 DATA 9,9,9,9,9,9,9,9,249,249,248,216,142.199.67.99.9,32,128.16,8,132,66,34 
1939 DATA 9,9,9,9.9,9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9 

1949 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,.9,.9,9,9,9,9,9,9,9,9,9 

1959 DATA 9,9,9,9,9,9,9,9,.9,.9,9,9,9,9,9,9,9,9,9,9,9,.9,9,9 

1969 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,.9.9.9.9,9,9,9,9,9,9,9 

1979 DATA 9,.9,1,9,9,15.9.9.9.9.9,7,15,9,15,15,9,9,9.9,.9,9,9,9 

1989 DATA 9,9,189,129,231 ,255,126,192.24,126,126,126,24,9,129,129,9,9,69,9,192, 
255, 66,9 

1999 DATA 9,9,128,.9,9,249,9,9,9,9,9,224,249,9,249,249,9,9,9,9,9,9,9,9 

1199 DATA 9,9,9,9,9,9,4,7,15,15.3,9,1,3,3,8,9,9,9,9.9,.9,9,9 

1119 DATA 192,126,126,255,192,9,9,9,129,129,129.9,129,195,129,9,.9.66,126,69,9,9 
, 9 ,g 

1129 DATA 9,9,.9.9,9,9,32.224,.249,249,192.9,128,192,192,16.9,9.9,9.9,9,9,9 

1139 DATA 9,32,56,9,9,9,9,9,39,28,64,112,112.9,9,9,9,9,9,9,9,9,9,9 

1149 DATA 9,9,9,.9.9,9,9,9,9,9,9,9,9.9,9,9,9,9,9,9,9,9,9,9 

1159 DATA 9,9,9,9,9,9,9,9,112,112.9,9,9,9,9,9,9,.9.9.9,9,.9,9,9 

1169 DATA 9,9,9,9,9,9,9,9,9,9,9,115、223,159.9,9,9,9,9,66,144,159,9,9 

1179 DATA 9,9,9,9,9,9,9,9,32.56,8,152,184,253,127,127.32.56,8,16,32,129.64,72 
1189 DATA 9,9,9,9,9,9,9,9,1,3,14,12,152.248,.248,.249,1,2.8,8,144.9,64,9 

1199 DATA 9,9,9,9,9,9,9,9,9,1,15,79,249,136.9.3,.9,1,8,78,241,136,9,2 

1299 DATA 9,9,9,9,9,9,9,9,127,255,255,255,255 ,127.255,255,65,9,16.9,128,68,128, 
16 

1219 DATA 9,9,9,9,9,9,9,9,224,231 ,252。248,248,249,224,224.9,7,4.9,136,16,9,64 
1229 DATA 9,9.9,9,9,9,9,9,3,3,31,255,241 144,128,128,2,2,16,142,225,144,128,128 
1239 DATA 9,9.9.9.9,.9,.9,.9,255,255,255,248,298,128.9.9,2.64,7,49,89,128.9,9 

1249 DATA 9,9,9,9.9,9,9,9,248,.252,252,238,15,7,1.3.9,9,16,232,8,6,9,2 


1250 
1260 
1270 
1280 
1299 
1300 


DATA 9.9,9,9,.9.9.9,9,9,9.9.9,9,9,9,9,9,9,9、9,9,9,9,9 

DATA 9,9.9,9,9.3.9,9,9,9.9,9,9,9,31,63,9,9,9.9,9,9,9,9 

DATA 9,9,9.9,15,143,143.128.3.3.63,127,127,127.127.127.9,9,9.9,15,15,15,9 本 
DATA 9.9,1.9,9,7.4.4.9.9.9.3,7,9.3.3,.9,9,9.9,9,9,9,9 

DATA 9,9,249,7.3,255.9,9,127,255,6,.248.252.9,255,255,9,9,1.3.3,1.9,9 

DATA 192.252 252.255.255 255.127、127.63.3、8.0.0、0.128.128.64.252.252.255.2 


S5,254,129.112 


1319 DATA 4,9,9.9.9,9,9,9,3.3.3,3。3,.9.9.9.9,9,9,9,9,9,9,9 

1329 DATA 9,9,9,9,9.9,.9,15,199,199,199,199,199,63,63,9,9,9,9,9,9,9,9,9 

1339 DATA 126,124,124.126,127.255.255,255,128,128,128,128,128.9,9,9,9,9,9,9,112 
ぅ 2Z48.254.255 

1349 DATA 9,9,9,9,249,241 ,241,1、192,192.252.254,254,254,254,254,9,9,9,9,249,249 
5249.9 

1359 DATA 9,9.9.9,9,192.9,9,9,.9.9.9,9,9,248,252.9、9,9,9,9,9,.9,9 

1369 DATA 9,9,9.9,9.9,9,9,9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9 

1370 DATA 3,.63.63.255,255 ,255,254 254.252.192,.192.0,9.9,1。1,2.63.63,255。255 。127 
> づり 。14 「 
1389 DATA 9,9,159,224,192,255,9,9,254,255,96,31,63,9,255,255,9,9,128,192,192,12 
8.9,9 

1399 DATA 9,9,128.9,.9,224.32.32.9,9,9,192.224.9,192,192,9,9,9,9,9,9,9,9 

1499 DATA 126,.62.62,.126.254.255 ,255,255,1 。1,1,1、1.9,9.9.9.9,.9,9。14,.31 ,127,255 
1419 DATA 9,9.9,9,9,9,9.249,182。182,182,182.182.252,252.9,9,9,9,9,9,9,9,9 

1429 DATA 32.9,9,9,9,9,9,9,192.192,192,192,192.9,9,9,9,9,9,9,9,9,.9,9 

1439 DATA 9,9.9.9,9,9.9.9,9,9.9.9,.9,9,9,1.9,9,9,9,9,.9,9,9 

1449 DATA 1,1.9,9,9,.64.64.96.2.6,15,31 ,63,63,191 ,159,9,9,9,9,.9,9,9,9 

14S59 DATA 255,255,255 ,129,.9.9.9,9,9.9.9,128,249,224,192,128,255,127,63,9,9,9,9, 
9 

1469 DATA 9@,.9.8.8.12.6,.3.9,3,7,7,23,51 ,121 252,255.9,9.9,9,9,9,9,9 

1479 DATA 48,39,9,9.9,9,192.9,297,224,252,248,249,224.9,128,9,9,9,9,9,.9,9,9 
1489 DATA 9,.9,9,9,9,.9,.9,9.9,9.9.9,9,9,9,9,9,9,9,9,9.9,9,9 

1499 DATA 9,9,9,9,9,9,9,9,255,255,255,254 ,124.9,9.9,9,9,9,9,9,9,9,9 

1599 DATA 9,9,9,.9,9,9,9,9,128.9.9,9,9,9,9,9,9,9,9.9,9,9,9,9 

1519 DATA 9,9,9,9,9.9,9.9,9,9.9,9,9,9,9,9,9.9,9.9,9,9,9,9 

1529 DATA 255,255,255,39.9,9.9,9,9.9,9,1,15.7,3,1.255,254,.252,.9,9,9.9,9 

1539 DATA 128,128,9,9,4.4.4,12.64.96,249,248,248,259,251 ,243,9,9,9,9,9,9,9,9 
1549 DATA 9,9,9,.9,9.9,9.9.9,9,9,9,9,9,9,128,9,9,9,,9,9,9,9 

1559 DATA 9,9,9,9.9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9 

1569 DATA 248,9,9,9,9,9,9,9,7,127,63。 63.31.31。15.9.9.9.9.9.9,9,9,9 

1579 DATA 9,9,9,.9,9,9,9,9,192,224,224.224,224 224,192,.9,9,9,9,9,9,9,9,9 

1589 DATA 9,9.9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9 

1599 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9.9,9,9,B 

1699 DATA 9,9,9.9,9,9,9.9.9,9,9.9.9,9,9.9,9,9,9.9,9,9,9,9 ' 

1619 DATA 9,9,9,9,9,9,.9.9,249,126,.63,15,.3,15,7,3,128,.68,49,12,2,12,4,3 

1629 DATA 9,9,9,9,9,9,9,9.9,.9,128,192,248,249,224,.249,9,9,9,9,169,9,64,16 

1639 DATA 9,9,9,9,9,9,9,9,15,7,3,1,3,3,15,31,9,4,2,1,2,2。9,28 

1649 DATA 9,9,9,.9,9.9,9,9,.9,9.9,9,9,9,9,9,9,9,9,9,9,9,9,9 

1659 DATA 9,9,9,9,9,9,9,9,254,127,31,255,127,63.31,7,128,199,16,129,68,32,25,4 
1669 DATA 9,9,9,9,9,.9,.9,.9.3,15,7,135,15,135.199,227,2.8,4,4,9,4,4,66 

1679 DATA 9,9,9,.9,9,9,9,9,9,128,192,64,193,255,255,255,9,128,192.64,68,128,144, 
139 

1689 DATA 9,9,9,.9,9,9,9,9,3,7,15,63,255 ,255,255,255,2,4,8,32,8,132.9,9 

1699 DATA 9,9,.9,9,9,9,9,9,243,255,255,255,255,255, 255,255,2.9,162.9,8,64.9,128 
1799 DATA 9,9,9,.9,.9,.9,9,9,128。 224,192,128,128,9,128,192,128,32,64,9,9,9,9,9 
1719 DATA 9,9,9,.9,9,9,9,9.9,9,9,1,7,7,31,255,9,9,9,1,4,4,16,132 

1729 DATA 9,9,9,9,9,9,9,9,9,4.254,252,248,249,224,192,9,4,128,49,9,128,9,192 
1739 DATA 9,9,9,9,9,9,9,9,225,9,249,224.224,128,128,3,225,9,89,9,96,9,128,2 
1749 DATA 9,9,.9,9.9,9,9,9,255,127,63,31.63,127,255,254,34,64,33,16,36,65,144,9 
1759 DATA 9,9,9,9,9,9,9,.9,9,192,192,224,192,128,9,.9,9,9,9,32,9,9,9,9 

1769 DATA 9,9,9,9,9,9,9.9,15.63,159,223,223,255,255,255,8,32,16,29,16,.9,34,9 
1779 DATA 9,9,9,9,9,9,9,9,252,248,249,224.9,249,253,255,72.9,9,224,9,9,33,9 
1789 DATA 9,9,9,9.9,9,9,9.9,1.3,7.15,63,255,255,9,1,2,4,8,33,9,18 

1799 DATA 9,9,9,9,9,9,9,9,255,63,31 ,14,69,129,9,9,291 ,32,17,19,32,129,9,9 

1899 DATA 9,9,9、9,9,9.9,9,255,255,255.9,9,9,1.7,2.36,.255,.9,9,9,1,4 

1819 DATA 9,9,9,9,9,9,9,9,255,255,255,63,63,249,241 ,241,65,4,192,34,32,129,33, 1 
1829 DATA 9,9,9,9,9,9,9,9.9,9,1.7,3,15,31.63,9,9,1。4。2.8,18,36 

1839 DATA 9,9,9.9,9,9,.9,9,15,63,252,248,248,249,152,136,8,35,9,72,9,96,16,8 
DATA 9,9,9,9,9.9.9,9,195,143,255,253,29.59,243。127,2412,144,133,17.34,139, 
7 

1859 DATA 9,9,9,9,9,9,9,9,127.69、39,15,9,9,9,9,65.36,16,15,9,9,9,9 

1869 DATA 9,9,9,9,.9,9,9,9,24,24,.49,3,9,9,9!9,16,16,33,3,.9,9,9,9 

1879 DATA 9.9,9,9,9。9.9,9,241.227,193,129,3,7,3,14,145,162,1,129,2,4,3,14 

0 DATA 9,9,9,9,9,9,9,9,255,248,199,231 ,131 ,195,129,249,151,.64,56,199,139,66, 
1899 DATA 9,.9,9,.9,9,9,9,9,39,4,9,224,252,255,248,254,26,4,9,9,128,71,8,139 

1999 DATA 9,9,9,9,9,9,.9,.9,63,15.5,9,9,249,28,9,49,19,5,9,9,224,28,9 

の DATA 9,9,9,9,.9,9,9,9,224,192,128,129,192,249,248,252,32。64,128,129,64,16,1 
1929 DATA 9,9,9,9,9.9,9,9,127,127,254,252,31 ,15,31,15。72,65,139,224,16,19,16,19 
1939 DATA 9,.9,9,9,9,9,9,9,192,128,.9,9,224,248,252,248.64,128,9,9,32,136,68,8 
2 DATA り 9,9,9,9,9,9,9,9,248,249,224,249,192,128,128,224,72,16,169,16,64,128,1 
1959 DATA 9,9,9,9,9,9,9,9,63,127,254,127,39,12,9,9,32,73,132,97,18,12。9,9 

1969 DATA 9,9,9.9.9,9,9,.9,224.69,28,56,9,9,9,9,224.36,29,56,9,9,9,9 
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地獄 の 練習 問題 つの エム ・ エ ー シ ー (会 06-315-0541)FM- 7 / 8 /NEW 7 /773.5、5 イン チ デ ィ ス ク \6.,800 人 天使 に な る 
だ め に 地獄 で 試験 を 受け る アド ベン チ ヤー ゲー ム 。 い ろ ん な 試験 官 の 質問 に 正解 する と 道具 や ヒン ト が も ら え る 。 


の と だ ZH ル 7 
の と /7 ア アビ 


6? 


か な か むず か し い ぞ 。 
参 考 「 マ イコ ン BASIC マ が ガ ジン 」 
7 て 戦車 を 、 で N 博 士 を 左右 83・6,『MOG MOG』 
に 動か し な が ら 地 中 深く も で っ て いこ 
う 。 戦 車 で 穴 を 掘り 、N 
| |OI 遊び 方 陸上 が 不発 弾 (*) に 触れ 
る と 不発 弾 を 処理 し た こ 
3291 年 (ほとん で も な く 未 来 )、 第 3 次 と に な り 、 ス コア 加算 。 
世界 大 戦は M 博 士 発明 の コバ ルト 爆弾 た だ し 、 戦 車 が 直接 不 
に より 終結 し た 。 生 き 残 っ た わずか の 発 弾 に 触れ だ た り 、N 博 士 
人 類 は シェ ルター に の が れ 、 冬 眠 に 入 が 下 に ぶつ か うだ りす る 
っ た 。 時 は 流れ 、4291 年 、 冬眠 か ら 晶 と ゲー ム オ ー バ ー だ 。 リ 
覚め た 人 類 は 地 中 深 くも で っ て いる プレ イ は ANY KEY。 
発 弾 を 処理 する た め 、 リ モコ ン 式 の 地 戦車 の あと に うま く N 
底 戦車 を 開発 し た の だ が ……… 。 リモ コ 博士 を 通し て いく の が な 
ン 式 な ど と いう アホ くる さい 方 式 に し て 
し まっ た 開発 者 の N 博 士 は を の 責任 を 
と り 、 戦 車 の あと を つい て 、 地 左 へ 不 
発 弾 処 理 に 向かう の だ っ た 。 
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の は へ ば 必須 等 す ひ さび き て 琶 2 
さき Sr 。slw と て 詩 店 に JIN 装い ー 


mm 圭  。NYH 山 。He ま 導 v は 
ごい さす 。 叶 4 柏 吾 療 町 


一 変数 リス ト ・P…… 戦 争 消 去 の 際 の X 座 標 : 4 博士 ・ 戦 車 ・ 土 ・ 爆 : きり いつ て 、 こ れ は の 人 で や る 
X…….N 博 士 の X 座 標 ・ 還 プロ ブラム の 説明 弾 の 表示 ・ ゲー ム で す 。 婦 め ちゃ ん こ ム ズ イ 、 
Y…… 戦 車 の X 座 標 S 初期 設定 > ゲー ム オ ー バ ー 処 理 : バッ チリ 賞 。 

Ga スコ アウ > スコ ア 表 示 と キー ス : 田 チ エッ ツ フ ボイン ト 

回 iP スコ コツ ・ 戦車 の あと に つま ぐ 人 を と お ・ 


O…N 博 士 溢 去 の 際 の X 座 標 " 3 博士 ・ 戦 車 の 消去 " す の が 、 だ い へ ん 難し い 。 は つ 


ふつ う の よ く あ る お 酒 な の に 、 タ コ 
の キャ ラク タ を つけ だ だけ で フカ 売れ 
し た お 酒 が あっ た わ ぇ 。 

同じ ゲー ム で も 、 キ ャ ラク タ の よる 
で 人 気 が 出 ち ゃ うっ て こと も ある し 。 

で 、 こ の 『 タ コマ リン 」j。 い わ ゆ る 、 
ふつ う の 港 水 艦 ゲー ム な ん だ けれ ど 、 
と きど き 出 て くる ボー ナス の 大 ダコ が 
の ひか が いて 、 も て も も も し ろく な っ て い 
る の だ 。 

キミ が あや つる の は 、 海 に 浮か ぶ 駆 
逐 艦 。 中 皿 キ ー て 諾 右 に 移動 し な が ら 、 
マグ ネ チ ッ ク 爆 弾 を 投下 し て 、 敵 の 洪 
水 艦 を や や っ つけ よ う 。 爆弾 投下 キー は 
と [|。。 これ で 左右 に 投下 する の だ 。 

潜水 艦 は 深い と ころ に いる の を や っ 
つけ だ ほう が 、 上 難し いぶ ん 点 が 高く な 
る ぞ 。 
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edb dn 


0 


Ei 
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ひき ざさ JIN 。 村 コー キー ロロ の の 
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る 


いる Sm さい 半 上 半 中 へ 41S の 直 宇 さ 半 
| J 提 っ rvoyrr で か 人 S ま びと J 沿 


| つて SC 寺 と 0 は NS 旧 
| N き St . 田 料 目 


この ゲー ム の 売り 物 、 大 ダコ を や っ 
つけ る と ボー ナス 500 点 。 

料 弾 の 爆風 が タコ や 潜水艦 に 触れ る 
だ け で や っ ける こと が で きる の で 、 い 
っ ぺん に まとめ て や っ つけ ら 65 れる よう 
効率 的 な 攻撃 を 心がけ よ う 。 

敵 の 潜水 艦 は ゲカ プ カ と 浮か ん で < 
る 機 香 で 攻撃 し て 〈 る 。 


点 以 上 に な る と 、 タ イマ ー が も と に も 
と る の で さら (G 高 得点 が ね ら え る の だ 
リプ レイ は スペ ー ス ・ キ ー を 押 そ う 。 
今回 は タコ の 出 て くる ゲー ム が 、 他 
機種 に も あっ た けど 、 や っ ぱり まだ タ 
っ の 人 気 は 続い て いる の か な 。 で も 、 
エリ マキ トカ ゲ と か ラッ コ と か は 投稿 
作品 に は 見 あたら な いか ら 、 今 度 は る 
の へ ん を も ねらっ だら 7? (も う 古 いか ) 


SCORE 本 まま 1 お は 日 1 生ま の 189 T1ME 9B:@4:24 


ちら の 57b。 ご 50 の 5 うっ 
か りあ だ っ て し まう と ゲ 
デム オー バー だ 。 

また 、 制 限 時 間 も 3 分 
に 決め られ て いて 、 残 り 
時 間 が な く な っ て も ゲー 
ム オ ー バ ー。 で も 、5000 


ャ 今 し も 大 ダコ に あ だ 
つ だ 爆 弾 が 爆発 し よう 
と し て いる ぞ 。 


A ボ カン 。 真 中 の 十字 は 爆発 し た と ころ な の だ 。 


ー さ スバ パーク バッ シュ へ ワー クハ ウス (会 03-263-5429) ひ M 5 (Pro..Jr.) 要 BASIC-G つ テー プ \3.,500( 通 信販 売 の 送料 込み ) ん し 】 
> バッ ェ ッ ル ん / @ 小 さ な 小 屋 に 閉じ こめ られ だ 人 間 を 助け て いこ ゲー ム 。 へ ヘンテコ な 怪物 や 落と し 穴 に ご 注意 ! 


NNIN3m NIS 


て NN 拉 om 4 う 史 へ ざこ の SF Tet9 吉 由 の 一 


\ ヶ 
2 ヽ 


ST 


9 の EE ま C0 J)。 


98 8 
TECHNOPOL15S 


1 ^/「2] フ リフ J」 1-299 HUBRS1C 
2 9 旧 E 2 W 上 比 ま り 0 テ 


2 り DEFINTR-g :PLRY フ :CL(9)=1 :CL(1)=2:CL(2) 
RBC③ ラ 6 

39 COLOR フ , 9 :CLS :GDT029g 

4 CULUR フ 2, 9 :CLS :X=15 :BB=9 :TR=g :SC=g :HD=9 
nsTE ま (1)=" ョ ma "ETK$ ま (9)="F)1 
3 和 T 愉 まま 0 に PS グ ZENPSMUECOO) う 2 NE1 う 3 

569 FDRI=gTO8 :J〔( 1 )=9:IS( 1 )=9:NEXT 

29 COLOR4 :FOR1=9T039 :LOCRTEI,24 :PRINT " 置 " 
j:NEXT :PRINT" 田 "CHR$(15) 

89 FORI=gT019:LOCRTEINT(RND( 1 )*32), 23 :PR 
INT に ーー" 31NEXT 

3 COLDR1 :FURI=gT0D39 :LDCRTET,4 :PRINT "て " 
:NEXT :CULOR2 フ 

1 9 CDULOUR フ 2, :PRINT" 田 SCURE ネネ ネネ 9 HI "5: 
PRINTUSING "米村 "3HS ji 

119 PRINT' TIME gg:99:g9"j:TITE$="g9:B9: 
9" :GODT016g 

1 29 ^ーーーーーーーー ク チ ク 電 リーーーーーーーーーーーーーーーーー 

1 3 り 朋 $=INKEY$(9) :GDSUB299 :GOSUB199 :G0SUB 
469 :GDSIB559 :G0SIB6g9 

14 り 9 IF 朋 $="」" ND BB=g THEN POKE&HC2D, 59 
:CRLL&HC25 :BB=1 :BX=X+ 1 :BY=5 :G0SUB469 :CRL 
L&HC49g 

159 IF 人 ="." RND BB=9 THEN POKE&HC2D, 59 
:CRLL&HC25 :BB=1 :BX=X+5 :BT=5 :GDSUB469 :CRL 
L&HC49 

1 59 X=X+(RR$=" 団 「)-($= リ 四 「 ) :X=Xー-【X く )+(X>3 
3) 

129 LOCRTEX, 2:CDLOR6,9:PRINT" NNT ji:COLOR 


4.53PRINTUEP ) EDLOR6」。93PRINITZ/ 

189 LOCRTEX, 3 :COLOR2 :PRINT" jiCOLORO, 2 
*PRTNT "ーーー" j CODLODR2 9 iPRINT" 思 の):CEULOR ノ > 
9 :G0UT0129 


19 FOURI=1TO5:IFCHRRRCTER$(X+1,3)="UTTHE 
N25gELSENEXT :RETURN 

2 ^ーーーーーーーー セ - ス イィ 攻 フーーーーーーーーーーーーーーー 

21 ロ T=T+1:IFT>8BTHENT=g 

22 IFJ(T)=BTHENFUR 1=gT0129 :NEXT :G0T0319 
23P IFJ(T)=1THENLOCRTEX(T)+1,Y(T)-1:COLO 
R フ 9:LOCRTEX(T),Y(T) :S=(YT(T)-5)*19:PRINT 
S :SC=SC+S :G0SUB53g :FORO0=9T08 :NEXT :LOCRTE 
X(T)+1,Y(T)-2:PRINT " 回 司 還 還 還 加 還 回 田 加 
回 国 "ij:J(T)=9:GOT031g 

24 FURK=gT03 :C ま =CHARRCTER$(X(TJ+K,」Y(T)〕 
259 IF C$=" り "17 OR C ま = リー" OR C$=" 介 "THENJ〔 
T)=1 :COLDR2 :LOCRTEX(T)+1,Y(T)-2:PRINT "1 四 
団 | 還 還 ーー 上 還 還 田 還 田 還 還 1 :PLRTT+C1T iB0TO 
31gELSENEXT 

269 LOCRTEX(T),Y(T) :PRINT" 
T)+g(T)*(RND( 1)+1 ) 

2 フ 2 IF %(T)<g OR %(T)>35 THEN J(T)=9:G0T 
D 31g 

28g9 LOCRTEXT)。Y(TJ:TFgCT)=1THENCOLOR/。 り 
*PREINT "Fi:COLDRC(T) :PRKINT 「 甘 議 に :GOUTOU399 
2 COLORC(1),9:PRINT「 項 議 ):COLOR フ EPRINT 
3 11 8 

3g9 IF RND(1)>T(T)Z39 GOSHB439 

31 攻 ^ーーーーーーー ES 025 NN NN、 思う で マイ SR 


31X( 1 = ミ X【 


66 


32g IF J(T〕)=g RND RND(1) く <.5 THEN 339 ELS 
尽 3SM 

339 U り =RND( 1)*3:C(T )=CL(U) :〆=RND( 1 ) : ミ = メン 
: マ = ニ メ ー1 : ざ (1 =:T(T)=RND( 1 ) ネ 14+ ノ 

34 り J(]T)=2:IF ミ =-1THENX( 1 )=35SELSEX(T )= 
359 =F1+ 1 :IFFT=STHENF1= り 

369 IF IHS(H)=9 THEN FORI=9T019:NEXT :GOTO 
41 り 


329 ^ーーーーーーーー キ ライ イト" ウーーーーーーーーーーーーーー 
389 LOCRTEHX(H),HYCH) :PRINT" "jiHY(T)=RY 
CH)-1:IFHY(H)=3THENLOCRTEX(H) ,HY(P)+1:C 
0LOR1,9:PRINT "一 " j:GOT0429 


399 IF HY(H)=2 THEN PS(H)=9:GOT0O 419 

499 COLOR6, 9:LOCRTEIX(H),HY(H) :PRINT"*" 
41 RETURN 

429 COLOR2,9:LOCRTEHX(H), THYCT) iPRINT"U" 
:BEEP1 :BEEP9 :RETURN 

43 ーーーーーーーーー キ ラ イ ji) ッ セ イーーーーーーーーーーーー 
449 FORI=gT04 :IFHS(1)=gTHENHS〔 1)=1:HX(1) 
=X(T)+2:HY(T)=Y(T)-1:RETURNELSENEXT 

459 RETURN 

469 ^-ーーーー 2 パネ チッ クロ " ク が フーーーーーーーーー 
429 IF BB=9 THEN FORI=9TO05g :NEXT :RETURN 
489 LOCRTEBX, BY :PRINT" "jiBY=BY+] 

499 E$=CHARRCTER$(BX, BY ) :COLOR6, 9 

599 IFE$=" 独 "ORE$=" 較 "DRE$="" DRE$=". "DRE き 
=". "DRE$= リ ="THENPOKE&HCZD, 19 :CRLL&HC25 :B 
B= り :LOCRTEBX, BY :PRINT "借り:CRLL&HC49 :RETH 
RN 「 

519 IF BY=22 THEN BB=:RETURN 

52g LOCRTEBX, BY :PRINT" 生 "RETHRN 

53@ ^ーーーーーーーーー ス ] ア ヒ ヨ 2 "ーーーーーーーーーーー 
54g COLOR2, 9 :LUCRTE フ , 9 :PRINTUS 1NG "村人 
SCi:RETURN 

559 ^ーーーーーーーーーー ヲ ー イ ーーーーーーーーーーーーーーーーーーー 
569 IF SC>5999 RND HD=9 THEN T1HE$="99:9 
9 :99" :BEEP :HD=1 

529 COLOR2,9:LOCRTE29,9:PRINTTITHE$: 

58g IFTIHE$> "99 :92 :59"THEN259 

599 RETURN 

699 ^ーーーーーーーーーーー ヲ コーーーーーーーーーーーーーーーーーーーー 
619 IF TR=9 THEN FOR1=gTO129 :NEXT :GOTO68 
9 

62g FORL=g1T02 :H$(L)=CHARRCTER$(TX+L」 TTY) : 
日 $=H$(L ) : IFH$=" 介 "DRH$="1 "ORH$="ー" THEN2 フ 19 
ELSENEXT 

639 LOCRTETX, TY :PRINT" 
還  ": 

64g TX=TX+T ミ :IF TX<9 OR TX>32 THEN TR=9: 
RETURN 

659 Q=Q+1 : ロ =Q+(Q=2)+(Q=2) :POKE&HC2D, FU(G 
) :C8LL&HC25 

669 COLOR2, 9 :LOCRTETX, TY :PRINT" 作 5 :COLDR 
6, 2:PRINT "="j:COLOR2,9:PRINT " 箇 還 回 回 回 " 

629 COLOR5, 2 :PRINTTE*$(Q) "回 回 " j :COLOR2, 
9 :PRINT" 穫 「) :COLOR フ 2:PRINT!0@「) :COLOR2」 
9 :PRINT ' 還 回 E②" )TK$(Q) ji:CRLL&HC49 :RETURN 
68g IF RND〔1) く <.11HEN TR=1 :※=RND〔 1 ) : ミ = ミネ 2 
:T ミ = ミー1 :1Y=RND( 1 )*8+19:ELSE RETHRN 

699 IF 1 ミ =-1 THEN TX=36 ELSE TX=g 

299 RETURN 


団 団 回 回 団 回 回 加 団 


ノ 19 FORI=gT019:FORU=gT01 :COLOR9, 6 :LOUCRTE 
TX ITT:PRINT 軌間 加 回 回 困 " TE$( 晶 ) : 

229 PRINT "回 司 国内 0 回 回 還 ") :CODLOR6,9:PRINTTK 
$( 昌 ] jjPLRT フ リーEg" ENEXT :NEXT :CULOR フ 

239 LOCRTETX,」TY+1 :PRINT "599" :SC=SC+599 :G 
USUBS39 LOCRIETKA TTPRINT" 団 回 回 回 国 団 回 回 


国 団 回 回 


1 es 
う 


24g 1=g:RETURN 


ノ っ P 


ノ 


ノ 
了 
9 
9 
9 
9 
9 


8 っ P 
86 り 
9 ノ ゆ 


一 変数 リス ト 


SO…… ス コア ・ J( )…: 潜 水 編 フラ ブ 
TA…… タ コ フ ラ グ ・ X( )…… 浴 水 艦 X 座 禁 
TX…… タ コ X 秦 標 ・ Y( )…: 洪 水 艦 Y 座 標 
TY…… タ コ Y 座 標 ・ MS( )… 雷 フ ラブ 
BB…… マ ブ ネ チッ ン 爆 弾 フ ラ : MX( )… 機 電 X 座 標 

グ ・ MY( )…… 機 雷 Y 座 禁 
BX…… マ ブ ネ チッ ン 爆 弾 X 座 ・ プ ロブ ラム の 説明 

標 ・ 10110 初期 設定 


ーーーーーーーーー Ns: 発 
69 COLOR2Z:LOCATE19, フ :PRINT" 
E_R ":PLAY"-D3" 

29 LOCRTE11,9:PRINT" 
SC>HS THEN HS=SC 

89 IFINKEY$=" "THEN3gELSE289 

9g < 

9 CONSOLE1 , 23, 4 , 36 :CODLUR2, g 
ESDINI | | | 症 是 邊 | 出 
2Z9 PRINI" _ 血 | 回 較 較 半 較 較 還 時 上 
39 PRINT" 企 
49 PRIN1" 
PRIN1" 
PR1NT" 
PRINT" 


ほ 符 NN 世 0 WU 


生ま た 江 あお に 骨 EE : 肖 必 Y "S1 だ 


回 回 回 回 間 間 半生 凍 
「「| 較 | | | 還 | 間 較 還 較 韻 
|「| | 回 | 較 軒 男 | 四 3 

加 間 間 回 間 回 回 間 還 還 回 

| | | 較 | 還 軒 較 ! 半 較 男 。 II 


: BY…… マ プ ネ チッ フ 和 爆弾 Y 座 : 
… 駆 有 艦 X 座 標 標 


今 まで こ は ち よっ と 違う 。 いきなり こん な と ころ で 
予告 を 出し ちゃ う の も どう か と 思う けれ ど 、 と に か ご 
も は や 次 号 の 発売 日 が 決ま つて いる の だ / 

ショー ト ・ プ ログ ラム 満載 、 派 削 教 室 は 今 まで と 同 
じ だ けれ ご ど 、 読 者 の ペー ジ や 欄外 情報 も 入れ ちゃ う ぞ 。 
それ ガ ら 、 あ の で 大 先生 の 特別 企画 も 深く 静か に 進 
行 中 。 こ と に か ガ こ ご 、 今 まで より 以上 に 楽し い 雑 誌 に な る 
は ず だ か ら 、 ぜ ひ 期 待 し て て ね 。 

掲載 プロ ブラム の 選考 も は じ ま つ た ば か り 、 今 な ら 
まだ ま に あ う から ど ん どん 応募 し て ね 。 お 便り や 意見 
も どしどし 送 つ て ほし い の だ 。 ヨロ シク 。 


プロ グラ ム ポ シェット VolI.5 
ご こっ さり の 1 画面 < ショート プロ グラ ム に 
キミ の お 便り も 仲間 入り させ ちゃ う ぞ / 


サラ ダ の 国 の トマ ト 姫 つ ハ ドン ソン フト ( 信 011-821-1538) へ X 1 (C, D) ・PC-8801 ン 9801・FM- 7・S 1 〇 テー プ *\4.800. デ 
ラル イス ク Y6.800 (PC-9801 は ディ スク 版 の み ) @ サ ラダ 国王 女 ト マト 姫 を キ コ ウリ 戦士 と な つて 救う アド ベン チャ ー。 


の どど だ 3A7 
の と /7 了 7 だ 


CULURS, 
SINIEMI | | 関 時 間 半 | 還 較 | 」 敵 | 


PRKINT) 男 因 回 回 半 閉 固 開 回 還 男 
PRKINT | 男 回 回 回 且 回 較 較 。 因 回 回 
CULOR 1 , り :PR1IN] 加古 問 回 男 硬 介 舌 凍 午 各 重税 穫 半生 半 
回 。 回 量 各 較 

PRINT 生還 問 較 回 較 
PRIN] 「 罰 醒 諾 回 副 向 
PRTNT 回 回 回 回 間 回 加 間 加 還 重 回 間 四 
1i | 

6 も OUELOR ウ 3PRINTSPECS ナ 7 回 [e]。。 上 まき ] 。、。 SF 
PP MEY 

9/M に RINESPEES)/ | し に し 1 。、。 BBN" 

9336 (PRINTSPEC 1 は 2))『 国 7T RY KEYYi 

239 CDNSULE9g,25 , 9, 4g :COLORZ,」 ロ 

1999 PLRT2, "6G5RBG3R2BG3RBG8R3#556#G5RBG5R 
り G3R92G3R9G8R365RB+C ヨ " 

191 り 9 ]FINKET$=" "THEN1g1P 

1929 FORI=g9T015:LOCRTE9, 19 :PRINTCHR$( 1 4, 
15Jj:NEXT :CUNSOLEB, 25, 9, 4 :GUT04g 


120-190 駆逐 角 : 790-1020 タイ トル 
・ 200-300 洪水 艦 移 動 ・ 圏 チ エッ ツ フ クボ イ ント 

・ 310360 浴 水 艦 発生 ・ 普通 の 潜水艦 ゲ ー ム ハム で す が 、- 
・ 370420 機雷 秘 動 ・ 時 々 横切る 大 ザコ が 、 と て も い 
: 430-450 機雷 発生 ・ い 。 5000 点 を 越え る と 、 タ イハ 
: 460-520 マ プ ネ チッ ンク 爆弾 : が O に も どっ つて これ ます 。 そ の 
・ 530-540 スコ ア 表 示 ・ た め に は 、 馬 肥 艦 に か まわ ず 、 
・ 550-590 マイ ム ハ ・ 大 ダコ を 、 ね ら う こと 。 災 バッ 
・ 600-740 タコ ・ チリ 賞 。 

・750-780 ゲー ム オ ー バ ー  : 


6Z 


空 ///- ジ ル @ 


mW 


遊び 方 
某 研 究 所 の 邪魔 田 博士 が 発明 し た 、 
頭 の よく な る 薬 「 シ ナ デ ク ロー ム 」( 化 


SRNRDECHRO ひ ME SECRET 


JRR ひ OO 欠 う 


、 SVRDECHROIE 年 クズ サラ ミ う 今 。 
さす くま 分 ラ 


YO ほす RGO ひ OR^ ュ > 人 は タッ ジウ ュ ラウ そ やう 。 
3 多 G 〇 の こき ゝ 
CTURE 、 所 欠 CE ,。 BESK , SFE , 多 
C ひ の 計 財 人 稚 プ 化 


、 了 サマ メラ 


4 と こり あえぎ ず 繧 を 見 て みよ う 。 


NR 
り ン 汐 必 つら で べ ので 

Piyo em 上 

SB) 入っ 0 | 

リア 

am 


| OTD う 9c ウ NTT プリ 9 
< の ー の と の 9 ひみ 販 は へ 釣 


_ 
の の コー ト 鐘 吾 当 ゆ 」9wSSt 。 中 回 河 


せこ 上 の て 滑 局 は S ひ と rr 「 ず 4OSAS | 


し っ 栖 Tdhnoo こ き さ ボ 


NANASNKSSSNNNNNNNNNNNNNNNNNNNNNNNN 


上 ・ 120-130 
A や ( ) cite 0 

BS( )… 9 ・ 140-190 
MS$( ).NS( )…… メ ッ セ ー ジ  : 200-690 
C$…… 入 力 コ マン ド ・700 
一 プロ ブラ ム の 説明 ・ 710-720 
10110 初期 設定 ・730-810 


6 ぎ 


mW 


USE と MOVE を 使う 。 首 尾 よ く 使 命 
を 上 果して 脱出 で きる か な 7? 

文 参考 「RAM Pack NO.6 for FM- 
7 グー ムラ イア ラリ 


学 式 UsS04PPo21s、 別名 ウソ ッ ポ イ ) 
を 探し 出し 脱出 せよ / 


重 質 計 寺 ス ペー ス 1 個 十 名 
SVYHRDECHROHME SECRET 


詞 の 入力 で 、 こ の 部 屋 か ら 

錠剤 「 シ ナダ クロ ー ム 」 と リョ クッ 、 3 っ ジュ ラ セ コ 。 
出口 を 見 つけ た だ たら 、“OUT P PRRCK ,。 DESK 。 SAFE , が"、? け マス ヨ 
ROOM と 入力 し て あがり 0。 Ra 3910 


う マット RRCK 
OPEN DESK 
? 業 


や め る と き は |Fe 
基本 的 な 動詞 は | Fl に -|F5 | 
に 人 つの で UO7 。 を なの) は ほか いし 


P 
て 
ゴ 
て 
ォ 
て 
ひ 
て 


マテ クノ ポリ ス を 読も うと 
し たら N O / と 断 わ ら れ て 


SYNnRDECHROME SECRET 


1 


ミ 還 今 、 


お カラ 、 SYHRDECHROHE トイ ウ の クス リラ 
な の 話 < "ジラ ュ ラ セ ヨ 。 


を 。 ニュ ウサ ョ ワラ ジュ 


,。 DESK , SRFE , お )、 了 アリ マメ ヨ 。 
で は テテ 


』 ズミ 
HHND2 OPEN 


な 


bESK 
DE SK 


oe 


OO し まま > 


ア 才 
TRKE MHRGRZ INE 
ソン い > IO の 3 
和合 D HGRZ INE 


oriO ズ や の 
の 
人 て < りり た 


LO 
ま ら 
に コ 


コ 
コ 
P 
ゴナ 
6 
o 
K 
D 
C 
6 
e 
T 
ド 


て うと 
の い の 


ファ ン フ ション キー : 皿 チ ェ エッ ツ フ ポイント SG し まう 。 と こき 0 の グ 
の 設定 と 内 容 表示 ・ ミニ アド ベン チャ ー ゲ ー ム で ・ 一 ム の 最短 の 舎 え は 、16 ま で で 
コマ ンド 入力 、 判 断 ・ な か な ガ 楽 し め ま す 。 こ の ゲー ・ きる そう で す 。 が ん ば つて ぐだ 
各 コ マン ド へ の 対応 ・ ム に 、 物 足り な い 人 は 、DATA : ざい 。 災 バ パッ チリ 賞 。 

暗号 入力 、 判定 ・ 文 等 を 自分 で 改造 し て 、 自 分 の : 

OK,NO の 表示 ・ オリ ジ ナ ル の と に ベ ペン チャ ー グ 

ゲー ム オ ー バ リー ・ 一 を 作 つ て みて も 、 お も し ろ ・ 


SYNADECHROME SECRET 


19 FOR 1=9 TO 19:RERD $(TJ)。B ま (1 ) :NEXT :F 
OR 1=9 TO 18:READ H$(1),N$(1) :NEXT 
29 DRTRPICTURE , TRKE,NOTE , USE , PRPER, OPEN, 
RCK, RERD,DESK,LOOK, SRFE, HOUE , KEY, BRERK, 
HGINE , SRY,DRIUER, ERT, TRBLET , BURN, TECH 
NOPOL IS, OUT 
39 DATA" が" 7 ルリ リリ サス 。 リ "の" オチ ク 。 " 」 フ ウ ウ 
グ モノ , ネ が トメ サル レル テ 了 アサ ナイ 。 カミ セイ 。 スチ" こ 了 アイ テル 。 。 モク 
キノ 「SYNRDECHROHE」, カキ * 用 "カッ タテ イル 。 」 "ヤッ ク 9 9 
49 DRTR 「 了 アフ] ゞ 2、 [ 」 力 " 、 ア ラ ワ レ 9 。] 2 タバコ ト 、 用 カレ テイ 
ル 。 , ウ ]Y ナイ 。。 フラ キナ] トニ 、、。 テバ クチ" 1、 キ エ テ ジ フッ ク 9 " 
ぅ ル ノ ロ ヨク ナイ コト テス ヨ 。 。 コノ 、, オ エ ーッ 9 コラ ラ コワ フラ 29, 
"nn、9 イ ]299"」22- ッ 9 XX フル 2! 
59 DRTR9, 3, 4 , 5 
59 DRTR TRKE, OPEN, RERD,LOOK, OUT 
29 DRTR LIST,RUTO, RENUH, COLOR, CHR$( 
89 CONSOLE9, 25, 9, 4 の ゆ :CDLOR2, 9 :CLS :PRINT, " 
SYNRDECHROHE SECRETED" 
39 COLOR5 :PRINT" ] ノ RODOH カラ 、SYNRDECHROIE 
トイ ウ クス リラ ミウ リ 、 コノ Q ヤ カラ 0UT RODOH/ ト - ュ ウリ 
ョ クリ 、 2 バッ フュ リセ ヨ 。 男 " 
199 PLRY6,"C3EGEFR+CRB+D+F+D+C+D+E5C3EGE 
FR+CRB+D+F+D+E+D+C5" 
119 COLOR6 :PRINT "コノ ROOT こい 、" :FOR 1=1 TO 
4 :RERD R:PRINTR$(R)" 」。 "ji:NEXT :PRINT "用 
、 ア リフ 2 ヨ 。 " 
128 COLOR 8,2:FOR 1=1 TO 5:RERD FC$:KEY 
IFC$+" "iLDCRTE IT*8-8, 23 :PRINTUSING"& 
& "FC$」:NEXT 
138 KEY 6,CHR$(4,4,34)+"FKEYINIT"+CHR$(1 
3) :F6=19 
159 PLRY2,"+B" :CODLUDR2:INPUT "CDNHHRND" jC$ 
:S=INSTR(C$," "):IF S THEN B$=LEFT$(C$,S 
ー1 〕) : 朋 ま =RTGHT$(C$,LEN(C$)-S〕) ELSE 15p 
169 IF LEFT$(C$,3)=B$(19) THEN B=19:GOTO 
18 り 
129 B=9:REPERT :1F B$(B) く <>B$ THEN B=B+1 :L 


NTIL(B>19) :PRINT "トド ウフ カリ" j ド "NELSE R=g 
:RKEPERT :IF $(R) く <>R$ THEN =R+1 :HNTIL(R> 
19J iPRINT リ メッ イジ お" "ji"N" 


189 COLOR3 :FL=g 
199 ON B GOTO 289, 319, 329, 4 19, 559, 539, 6 1 
9,63g,649,659 

299 IF =g GOTO 239 

219 IF(R=1)*(F1=1) THEN F1=2:"0 

229 IF(R=2)*X(F1=3) THEN F1=4:"O 

239 IF(R=6)*(F2=1 ) THEN F2=2:"D 

249 IF(R=2)*(F3=1 ) THEN F3=2:"D 

259 IF(R=8)*(F4=1) THEN F4=2:"DO 

269 IF(R=9)X(F5=1 ) THEN F5=2:"D 

22g "N 「 

289 IF(R=6)*(F2=2) THEN F2=3:"0 

299 IF(R=8)*(F4=2) THEN F4=3:"DO 

3g9 "N 

31g IF(R=1)*※(F1=2〕 THEN F1=3:PRINTR$(2) 

$(1):GOTO 1589 

329 IF =3 THEN IF F4=3 THEN F4=4 :F2=1 : 

0" ELSE "PRINTH$(3+(F4 く <4)) :GOTOD 159 

339 IF 有朋 =4 THEN IF F3=9 THEN F3=1 :F4=1:" 
0" ELSE PRINTH$(3) :GOTO 159 

349 IF =5 THEN IF F2=3 THEN F2=4 :F5=1 :G 
DOT0 299 ELSE PRINTH$(4+(F2=4 ) ) :GOTOD 159 

359 IF((R= フ )+(=19))*(F3=2) THEN F3=3:"D 
369 "N 

329 IF(R=1)*(F1>2) THEN PRINT "フッ 3 ロリ スズ " 
:GOTO 158 

389 1F(R=2)*(F1=4) THEN F1=5:F6=INT(RND* 
19) :PRINTM$(5)$(F6)N$(6) :COLOR2 :PRINTN$ 
(2)R$(2)M$(8) :GOTO 159 

339 1]F((R=2)+(R=1g) )*(F3=3) THEN COLOR6 : 
PRINTN$(9)R$(19)M$(19) :GOTO 15g 


499 "N 

419 1F =9 THEN PRINTH$(9)$(91H$(19) :GO 

T0159 

429 IF(R=1 )*F1 THEN PRINTN$(2)N$(9) :GOTO 
159 ' 

439 IF (R=2)*(F1=4) THEN PRINTN$(2)N$(8〕 
:GOT0 159 

449 1F(R=3)*(F2=1 ) THEN PRINTR$(6)H$(9) : 

GOTQ 1589 

459 IFKR=4)*(F1 く 2) THEN PRINTR$( 1)M$(9) : 

F 1=1 :FL=1 

469 IF(R=4)*(F3=1 ) THEN PRINTA$( フ )M$(9) : 

FL=1 

429 IF(R=4)*(F4=1 ) THEN PRINTR$(8)H$(9) : 

FL=1 

489 IF(R=2)*(F3> 1 ) THEN PRINTR$(19)N$( り ) 
:FL=1 

499 IF FL=1、GOTO 159 

99 1F(R=S)*(F2=4)※(F5<2) THEN F5=1 :PRIN 

TR$(9)$(9) :BOTO 159 

1 IF(R=2 フ )*(F3=3) THEN PRINTR$(19)N$(9) 
:GOTO 15g 

529 IF(RA=9)*〔F5=2) THEN COLOR6 :PRINTN$(3 

)N$(9) :GOT0D 159 

53g IF(R=19)*(F3=3) THEN COLODR2 :PRINT "エッ 

9? 7 ナグ " 朋 $(19)" ヲ う ラ ナイ ノ ?2?" :GDTU 159 

549 PRINTN$( 1 )N$(g) :GDTO 158 

559 IF =g GOTO 23g 

569 IF =3 THEN IF F2 THEN F フ =9:"0" ELSE 
F2=1 :COLOR6 :PRINTN$( 4 )N$(〔 フ )N$(5) :GODT015 

9 

52g IF(R=4)+(R=5) THEN COLOR2 :PRINTN$(6) 
:GOTO 159 

589 "N 

599 IF =5 GOTO 2398 

699 COLOR2 :PR1INTB$(6)N$(8〕) :GOTOD 159g 

61g IF 本 =19 THEN COLOR6 :PRINT" ェ ライ 9 " :GOTO 
159 

629 "0 

639 COLOR2 :PRINTN$() :PLRY 2 フ ,"-Cg-E-6G-BC 

":GOUTO 259 

649 COLOR2:PRINTN$(19) :PLRY 2, "CODCECFCG 

CRCGCFCECDC" :GDTO 259 

659 1]F F2=g 1HEN COLDR2 :PRINT" テ "グチ 用 ナ 

イィ イッ 9" :GDTO 159 

66g IF FS<>2 THEN BEEP :BEEP :BEEP :CULOR2 : 

PR TINT "ラッ 9 - フ Z ヲ ワウ スル ルナ 9" :GOTO 25p 

629 PLRTY 2 フ ,"+C5+E+D+F+E+D3+C+D フ ォ E5+C+DB+ 

CR3B+C フ " 

589 COLOR6 :CLS :PRTINT" オメ テツ トウ 9 アナ タラ 」]、 キ チ フ ト 

> ス 24] め に 、 2 バッ ジュ リー - モ セイ ] ウ ヲ オ サ 

タク 。 オメ テト ウ 。 ゴク ヤッ ク ネ ! ユラ イ 


639 COLOR2:PRIN1 "回 回 PRESS [F6] KEY" :END 

289 COLOR6 : INPUT "アフ ] ヾ ウ ラ イル ヨ " iP :1F(P ま =R 

$(F6))*(F6<>19) GOSUB"0" ELSE 23g 

219 LABEL"0" :COLORS5 :PRINT "OK" :RETURN 15 

9 

229 LRBEL"N" :COLOR2 :PRINT"N09" :PLRY6」 "ー 有 

5" :RETURN 158 

239 COLOR2 :PRINT " ま " ウ フソウ チ "2 ライ 29 " 

249 FOR 1=1 TO 29:BEEP :NEXT 

259 COLOR2:PRINT "GRTE OUER9" :PLRY6,"+C5G 

3+CB5#F 3BRSE3GED1EC2 フ " 

269 PRUSE 19:PRINT"PRESS S KEY": 

229 IF INKEY$( 1 )="S" RUN ELSE 2 フ 2g 

289 LABEL"FKEYIN1T" 

239 RES10RE 29:FOR 1=2 TO 6:RERD FC$:KEY 
1,FC$ :NEXT 

899 KEY1,"RUN"+CHR$(13) 

819 CLS:PRINT "GO0D BYE9" :END 

829 ^ THE EASIEST DUENTURE GAHE?? 


839 ^ BY T.MRTRNRBE , , , DECHN0-SOFT 84 


849 ^ UERSION 1.3 ン ノン 1984 和 5 月 8BH 


ガッ ツン エニ ックス (会 03-366-4345) X 1 (C, D) 要 G-RAM ひ テー プ \3.,600 旬 ス フロ ー ル する 244 段 の 六 庫 の な か を 
動き まま わ つ て 果物 を すべ て 取る ゲー ム 。 エ レベ ー タ を 利用 し た り 、 銅 鍵 を 落と し て 敵 を や つつ け だ り の 新型 リ ワ フルタ イム 。 
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靖 UM 


文 参考 「 面 白 パ ズル ブッ ク 」 7 号 、『 シ 


mm デイ ング ャ スタ ダー ュ 


角 の 4 マス 、[2、 [4、 |6、 |8|! は それ ぞ 
れ の 辺 の 3 マス 、 5 は [5] を 中 心 に し た 


十字 の 部 分 が 反転 する 。 こ の 組み 合わ 
へ せ で あがり の 形 に 持っ て い 〈 く の だ 。 
[人 <) 遊び 方 エディ イッ ト す る と き は テン ・ キ ー で 
右 下 の 写 真 の よう に な れ ば あがり と カー ソル を 動か し 、[ が ON、 図 が O 
(ラフ パ スル 。 シシ クシ ルル だ けど 、 人 な か な FEF、 で きた ら 国 を 押す こと 。 PROGRANME 
か お も しろい ぞ 。 その うえ 、 自 分 で 問 II 
題 が 作れ る エディ イッ ト 機 能 付 きだ 。 つい に 完成 。 画 面 下 で キミ の だ め に 


キー の 使い 方 が ちょ っ と や や こし ぃ 。 バン ザイ レ て ぐれ る の だ 。 
テン ・ キ ー と 画面 の マス 目 は 対応 し て 
いて 、 そ れ ぞ れ の キー を 押す と その キ 
ー の 位置 を 中 心 に し た 数 マス が 反転 す 


る の だ 。 1 3 [7 |99 は それ ぞ れ の 


AO 対 村 議 。 叶 ペー 


NIS ロー 且 mmS 壮 の 等 開く 』 


。H 時 S 柄 間 泌 ツル | 


. つら らい 一 い 受 ピ デコ ヨー の の の 一 の て 証 | 


N 替 ノ へ 符 プ へ 和夫 プ へ 参 ノ 


も \ 
ま 
せ 
ん 
ン 
品 
タ 
ム 
人 
に 
人 
用 
し 
て 
る 

ノヽ ノノ トブ ヽ 


AJ 溢 きこ 生 ビ ー さ と C 品 叶 スピ の の | 


の ー の で て 宮藤 臣 の 


画 変 数 リス ト ・ TES…… 手 数 の カウ ンタ ー  ・1440 手数 ・。 と ころ で 、 バ ン ザ イ が 終わ る 
OE( )…… 問 題 の パタ ー ン ・ SX.SY…… ど こ か ら 反 転 や  : 1450-1770 ゲー ム オ ー ル バー 処 ・ と すぐ メニ ュー に も どっ つて し ま 
AN( )…… 答 の パタ ー ン ・ IXJIY…… 反 転 の 方 向 ・ 理 ・ いま す 。 そ ご こ で 、1660 行 の GO 
NO( )-…… 現 在 の / パ ツー ン  : 硬 プ ロブ ラ ム の 説明 ・ 弄 チェッ フ ボイン ト ・ TO110 を 消去 し 、 
RA$( )…… ラ ンプ の パ マ ターン ・ 60-160 初期 設定 ・ ちよ っ と 変わ つっ た パズル ゲー ・ 1665 GETMSIFMS=` ? 
MES( )…- メ ッ セ ー ジ の バタ : 170-200 問題 作成 (MZ) = : ム で 、 つ いつ い 熟 中 し て し まい : THENGOTO110 

5 ・ 210-320 問題 作成 ・ ま す 。 自分 で パタ ー ン を 作れ る ・ 1667 GOTO1665 
A$…… メ ニコ ー の 内 容 ・ 1000-1220 画面 表示 : の で 、 同 じ パ ター ンカ ら 何で ・ に する と 、 スペ ー ス キー で メニ 
X.Y…… カ ー ソ ル の 位置 ・ 1230-1290 HOLD UP ・ あ が れる か 、 競 争 し て も お も し : ユー に も どる よう に な り ま す 。 
XV,YV…… カ ー ソ ル の 物 動 _: 1300<1430 キー 入力 ・ ろ いと 思い ます 。 ・ バ ッ チリ 賞 。 
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た ー" 


sr うー-』 う ISIIWEN 本 OSN0O 9//【 

ILXJHN:,9d+91,。 う IS 人 IM ET LXHN:(( セ ※(1)dNd) LN IT )$1S+(G9+(/※(T)dNd) LN1 )$dHO+, 六 
+。 う ISIIMNEE(TF/(T)$ ヨ N)$dIM INIdd:<xI'F 0ST1O:((T)$ ヨ WM)Nd ヨ TOLT=Pd0d: TO0L9=Id0d 99/1 
90dMdL :ddTIOSNOO 2 と た (そく 手 と た と ュ + す (8/)$dHO+( G8 ) $HO+ (9 )$dHO+,、 ビ /4 た =(T)$ ヨ N 9G/I 


"信人 と と 4 、F GT 、(C(0 オ ーー1F> キ 、 る 4 る 4 ルー 。+( 8 )$dHO+( G8 )$JHO+(Z8 )$HHO+、 ビ と と 、 人 =(9)$dN 9 も /【 
5 9[/[ OILOD 9E/【 
9 も ヤ /1 NHHL 人 ,=$V [| 9Z/【 
9II NdHJ ,N,.=$V 』1:$V IdD 9IZI 
ぃ [ON/ 5S9 和 AA] 6 と Z た (tf ニ が AE ニ 1 へ 半 品 。 LN1dd 909/1! 
くく くく く へ そ - 必 NH >>>>> Add 669【 
IL OLOD:,9dEO9O9d09H9d09O TO9dZdH9d09 つ OiISfIW: ILXHN 9991 
ます キョ TSIIWMI 4 IVZNVH ささ マ パプ アダ エイ ENIGH g981 
ぃ o と 、4 へ 、M へ 馬 / い 馬 いい 還 還 , LN1dd 9 も 91 
ヵ 1 IVZNVd O O O O 。LNIdd:6I'9 dOSdI1O 9E9I 
sm うう ISfINEi。 ナチ 、A く AM ヘン NN ヘン へ ENIdd 9Z91 
ぃ 1 IVZNVd EN 問 LNIdd 9I9I 
の 全 の 全 、 / 全 、 全 N,LNIHdE61 "9 OSdI1O 9991 
GO0t9=1dOH: ヤ 0dAHL 96G【I 
くく くく く と 4 へ 、M >>>> AdHd 68GI 
9ICI NdHL 6>02 』I:IFP TXHN 99GI 
L+09=OONHHL(I*P)NV=(ITP)ONd1:EOLT=Pd0d:EOL1=180d: 9=02 9G セ 1 
くく くく く へ 、4 へ WV >>>>> AH 6 も ヤ [ 
ぃ )$LHD1Id LNIdd:E* ヤ < 0SJI1O : 【+SdL=S ヨ HL 9? ヤ 【 
くく くく く 6@ と モー > うう >> HH 6E ャ 1 
1 IXHN::((T と)ON)$VdLNIdd:G-IX9*/ 0S1O:T+(T" く )ON-=( 1 と )ON :ZddLSEOLT=1d0d 9E ャ 1 
ILXHN::(( と "IT)ON)$VJLNIdd:/'G-Ix9 0SdI1O:1+(Z"T)ON-=(Z* IT)ON:EOLT=1d0d 9Z セ 1 
くく くく < くく ロ E+1 /Z G >>>>> WMdd 6I ヤ 1 
9g? ヤ [ OLODEE((T+AS! T+XS)ON 
)$VdLN1Idd:T+ASX9* TI+XSx9 dOSdI1O::((T+AS*XS)ON )$VJLNIdd: 1+ASX9'G-XSx9 0SJIIO 8I ヤ 1 
・((AS'【+XS) 


s ら 6 と 4 へ 、VM 


・(E "(SdL)$dLS+, 


ON )$VJINIHd:G-ASx9*'[+XSx9 0SaO::((AS*XS)ON)$VJLNIdd:G-ASx9'G-XSx9 OSHO 99 セ 1 


[+([+AS'T+XS)ON-=(【+AS* TI+XS)ON:【+ 
(【+AS "XSDON-=(T+AS XS)ON:T+(AS*T+XS)ON-=(AS'T+XS)ON: [+(AS'XS)ON-=(AS*XS)ON 96EI 
と =AS: て =XS 98EI 
96EI OLOD:Z=AS:I=XS 9/EI 
96EI OLOD:T=AS:Z=XS 99EI 
96ET OILOD:T=AS:[=XS 9GEI 
くく < く << く ET176*/ >>>>> Add 6 も EI 
9 ヤセ TOLOD: ILXHN::((Ad'Xd)ON )$VJLN Id : 
G-Adx9'G-XdX9d0SJI1O:【+(Ad'Xd)ON-=(Ad'Xd)ON: IXAI+AS= 和 Ad : 1XXI+XS=Xd:COL9=Id0d 9 も EI 
9=AI:I=XI:I=AS:I=XS 9EEI 
9?CI OLOD:I=AIE9=XI:1=AS:E=XS 9ZEI 
9?CI OLOD:T=AIE9=XI:1=AS:T=XS 9IEI 
9?E1 OLOD:9=AI:I=XIEE=AS:T=XS 99EI 
くく < く < くく 9 9? ヤ "Z >>>>> Add 66ZI 
98 と I OLOD 96ZI 
9II'999I OILOD V NO:V 35 99Z【 
sn11A [と] 0O [Ii] HSII 
d ぃ LNIdd: 2 作 、1 キ ニ - と て ニ Z と LNIdd:」 244 と と 、 々 へ 二 / ビ ヒー 、4 手 と GLNIdd:9Z "IdO0SATO 9ZZ1 
9 も と 【 OLOD 99Z【 
9/ と TOLOD( 入 ,=$V ) -NO 9GZI 
91ZI OLOD::(9)$ ヨ NLNIdd:/ "1Z 05dIHO_ NHL (ET)$ ヨ HO=$V 』】:$V 1 ヨ D 9 も ZI 
:(【T)$ ヨ WM TNIdd:/"【Z 0SMnO 9EZ【 
くく くく く IF1 / + >>>>> MMHd 6ZZ【[ 
9IZ[ OLOD:99E['9EEI'9GEI'9ZEI'9C も [9IEI*9 
8EI'99ET'9/EI "9IZI"9IZT'9IZI'9IZI'9IZI'95ZT OLOD <? ヤ -($V)OSV NO: 9 り #+, つ ISIIN 9ZZ1 
91CI NdHLi =$V 』1:$V LHD 91IZI 


SdLLNIdd:E'GZd0SIO : ,#+ う -』 う IS : 1*PLX ヨ N :!(( 1 
"TP )ON)$VaLNIdd:G-1x9*G-Px90SIO: (TP)O=(T*P)ON:EOLI=PHOd:EOLT=IOd: 9=S ヨ HL 99ZI 
:(9)$ ヨ MLNIdd:/* Td0SI う : , ーーーーーーーーーーーーーーーー コ レーーーーー エ ーーーーーーーーーー コ 』 LNIHd 96II 

ぃ ーー 一 葛 * NdTJOM "1 | 1。 LNIJd 991I 

ぃ | レーーーーー ヨ MVJD0dd1 1 1 INIdd 99II 

el | 1。 LNIdd 9GII 

al "うつ *2*I*A 條 | 1, LNIdd 9?1{【 

6 | 1。 INIdd 9EII 

| ーーーーーー* 1 。 INIdd 9ZI【 

ad | | 1。 LNIdd 9III 

1 | | 1。 LNIJd 991II 

| | 1。 LNIdd 969I 

| | | 

| | | 

| 

| 

| 

| 

| 
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LU | 山 LN Id 9989【 
。 LNIdd 9/9! 
n LNIdd 9991I 
ぃ 。 LNIdd 9G9I 
。 LNIdd 9?9【 
ぃ 。 LNIdd 9E9【 


時 時 
p | 
山 | デ テ 1 
s| 11 と 、 そ が | 「 み ル 
ぃ | で ーー タ ぃ 。 LNIdd 9Z91 
p | の 天 り ど 衣 人 。 LNIdd 9191 
ぃ ーーーーーーーーーーーーー プ ーーーーー エ ーーーーーーーーーー」 すき 。LNIHd 999【 
くく くく く へ を - 人 4 スル と だ >>>>> MAHH 666 
Nd1Ldd:i 1。O。LNTIdd: 1+Z※ 人 *" [+CXX OSJI1O 9ZE 
NdI1LdHdiE。 人 LNIdd iT+C※A* 1+ZCxX 0SI1O 9IE 
9 も と 0LO0D: IE。 尊 LNIdd:T+ZXA' 1+ZXX OSJI1O 89 と 
999[ OLOD ( 誤 =$V)- NO 96Z 
9=(【+A"T+X)d6:9ZEdIISOD _ NHL ,X』=$V 』dI 98Z 
96C OLOD:T=(T+A'T+X) ヨ O:9IE ヨ ISOD NHL ,Z,=$V 1I 9/Z 
( と く A 和 A+ 人 人 )+( 9>A 人 人 + 人 ) 人 人 + 人 
= 人 人: ( とく AX+X ) +( 9 >AX+X ) ーAX+X=X : ( un て =$V ) -( 98, =$V ) =AA: ( sn9。=$V ) -(  / =$V ) =AX :$VLHD 9 
9IE IISOD 9GZ 
99Z OLOD: 9ZEd(ISOD NdHL9=(T+A* 1+X )dO JI Et 閣 LNIHd:T+ と CXA*T+CXX OSI う 9 も と 
5 に T Te 4 1] IOIO1IOI 6 2 1 トー キー オー+ ii IOIO1OI 1」 2 トー キー キー ゴ 8 Sm 1O1IOIOI 1 ーー キーー ト ーー LU VLVO 9 と 
1=A:T=X:IP IXHN:9=(I*P) 
0:E0LI=Pd0d:EOLI=Id0d: 1 LX ヨ N:$VLNIHd:$VOV ヨ 4: 9019=! d0』d: 9Z と ddO0LS ヨ dE IE。 LNIdd 91Z 
くく くく く (TIdH) (と 6 ナチ 、4 へ よ >>>>> AHJH 69Z 
999{ OLOD 99Z 
9【CN ヨ HL6 =00 ヨ 1 :T "FIXN: 1+00=0ON ヨ HL( IF )NV=( TP )d0 ヨ 1 :EOLT=PHO ヨ :EOLL=I0』 96【 
1 IXHN:(Zx([)dNH) TNI =( TP) ヨ 0:E0LI=PdOd:EOLI=IH0Od:9=02 981 
*esuLNIdd 9/【 
くく くく < くく (AOO) ? ナチ 4 と 4 と 、4 く よ >>>>> AH 69【 
9G[ OLOD:9/1*91C'99/[ OLOD V-? NO: d+.OISN 991 
gGI OLOD: Egg,LNIdd:9I 
"gc 0SdI1O NHHL 9=V 』I:V ID::。 義 6【[E] 0 〔[Z] 0O 〔I] HSrld, LNIdd:9I*9 0SJIO 9GI 
ndN ヨ 96 と と 、4 へ 二 。) と くす と と 、 ダ へ 寺 、- る を - て 。 コ く F。VLVO 9 も 【 
ILXHN: 
VI: に)。iILNIdd: TX と *8 OSAIO:$V dV ヨ di:E0OLT=1d0d::。[ -ccz ] ,LNIJd:9'9【 dOS(1O 9EI 
g?【 ddOLSd ヨ ad GZI 
(6 と 放 。)$DNIdLS:(9)dVL LNIJd:IL 
XJN: に (2 と )$HOVdS: (9)dVLLNIdd:/ 0 1=I d0d:(6 と " 放 。)$DNIdLS:(9)dVLLNIHd 9ZI 
*wsn LNIddiN' もつ "ヤン "9S TOSNOO II 
くく くく くく? - と ニ 〆 >>>>> Ad 691 
TFTTTT9 の TUTTTT[T VIVOEIIPLIXN (IP)NVQV ヨ :E0LT=PHOd:EOLI=Id0d 99I 
[ LN] * ON [ 入 ] ~ 59 和 ん 
6HSfld。=(【) き 1 AH の の の ゆ ゆ せ [ キ ] みあ ゅ の で HSd あ る あの ゆ で "町 相 あ ゃ ゃ やせ =(9)$HW 96 
作手 [ババ ババ ハ ド 揚 計り の ゆ ゆ ゆ せ 猿 。 半 ゆ ゆ 
ふゆ の ウ ツウ 還 還 昌 の ふふふ 人 還 還 還 識 昌 み ふい の 較 還 蘭 さや や の ふせ 硬 。 ,。=([)SVH 8 
。 OddL:(T)$ ヨ N*(T)$Vd'(E*E)ON'(E*E)NV'(E*E) ヨ 0 WI 9/ 
くく くく ? ル そん 4 本 E く ペー >>>> AH 99 
広まる ま 、 広 みえ エエ よみ メメ エエ エエ ネエ テテ MeP| 9G 
% 。 NIIO「 エ HMVJODOddXAHJ 9 ヤセ 
※ "つつ "うつ "IE 作 4A %※ 内 HH 09E 
※ り と と -Z 人 MO 999C-ZM JOJ へ 、 く また % 内 HH 9 
拓 湊 洋洋 洋 潤 甘 潤 潤 茨 潤 洋 湊 潤 浴 洋 基 潤 湊 潤 潤 粒 基 洋 基 ※※ 区 恒 避 9【 


古 呈 呈 せ 多 綴 問 。 ニ ( ) $V 紀 ・ LU 製 


-375-3401) X 1 (C,D) 〇 テー プ \3.500 @3-D つ ぽい 画面 構成 の スペ ー ス も の リア ル 


ー パ - イン ボー ズ 機 能 を 前 提 に 背景 は 黒 1 色 な の で 自分 の 好き な 背景 で 遊べ る 。 
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プロ スコ ム パ バック ( 合 03 
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w り 


の 


sy た / タイ ム ゲ ー ム 。 X 1 の ス 


遊び 方 


1 人 人 で も 、2 人 で も フレ イ て きる つ 
な ひき ゲー ム 。 

は じ め に 、「1 or 2 PLAYER?」 
と きい て くる の で 、1 人 て 遊ぶ な ら 1、 
2 人 て 遊ぶ な ら 2 を 入力 し て リタ ー ン 
・ キ ー を 押 そ う 。 

まあ と 、 よ だ ん に つか な ひき が は じ ま 
る 。 や り 方 は 、 ハイパー オリ ン ピ ビック 
な だ ど だ と 同 選 よう に 、 ひ だ すら キー を だ 
だ きま くる の だ 。 

PLAYER 1 は 、 [1 一 9| の キー な ら 
ほれ 2C も いら いら 。 だ だ し 、 四 と か 選 の キ 
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一変 数 リス ト 0 初期 設定 
C…… 人 間 の 座標 ・ 20~- 40 画面 表示 
A…… 人 間 の 人 数 ・ 50 キー 入力 
AS……KEY 入 力 用 ・ 60- 70 ゲー ム オ ー ル バー 判断 ・ 
BS…… 勝 つ を だ チーム 00 人 間 表 示 
田 プ ロブ ラム の 説明 ・100 ゲー ム オ ー バ ー 処 理 ・ 


72 


mWWWWMWW 


ー を 押し て し まう と エラ 
ー が 出 て し まう の で 注意 
し よう 。 

PLAYER2 は 、 訓 計 
[9| や 特殊 キー 以外 な ら 、 
どの キー で も いい 。 

コン ピュ ー タ は や だ ら 
強い の で 、 1 人 用 で や る 
と き は 深呼吸 し て 気 を 沙 
ち つ け て 。 慣 れ た ら 余 裕 
で 友だち と 戦 お う ぜ 。 


Yuo8、roP rs 

- 邊 ID は は はい 較 
を いと し いこ うい と いと テス ー 
+ の に 日 っ や oO 。 
ズー ーー 


00<3 の いび 
T イ Oo の TI の の ご ー コ は 


GO 
ーー スト ン アイ ゴー 


| 


ユン 


い ' 1 で 
TI 


コ エ マ || マ 、 〇 ょ て ト の 
エロ み 〇 コト 


mWWWWW 


よかっ | 9 選 
\ ツ < へ O③⑤ ヽ = Ox 


つい = 


WWWWW 


・ 一 チェ エッ ツ フ ボイン ト 

: ゲー ム オ ー バ ー 後 プロ プラム 

: 自体 も 終わ つて し まい 、 リプ レ 
イガ で きま せん 。 そ ご で 100 行 の : 

・ END を 消去 、110 行 GETX$:| : 

FX$=*S"THEN GOTO0, 


天 参 DOO0 ノ O 参 参 欧 D 参 O 全 参 き / @OOS 多 OO000 
DO 参り 参 参 参 / 〇 全 全 馬 き DOO 参 る D/ DO 欠 人 O 欠 00@00/ 0C 


マリ パース リク ピッツ ググ の 思 
領 で キー を 連打 / 


で も 、 愛 


・ 120 行 GOTO110 と すれ ば 、 で 
再 ゲ ー ム が で きる よう に な り の ま 
・ すず 。 放 アイ デア は いい ん だ けど 


WW 


アカ 


単純 明快 の あり ふれ た スク 


ロー ルレ ・* ゲー ム oe な ie カ ・ と 思っ 
だ に だら 、 ジ ラズ スズ ス J。 が ある の だ っ 
8 


円 円 で 左右 に 移動 し な が ら 6 
まがり くね っ た 穴 の な か を 進 
Pa 2 を こと: こま も は 
ジン ツー だ けけ と 、 な ん と の で 倫 床 
5 左右 に 揺れ る の だ / 

あり きだ り の ゲー ム に 、 ぜ ゼ 
リッ と スパ イス を ふり か けた 
と いう 感じ の アイ デア ね 。 

秋 れ る 感じ は 、 ち ょ うと 地 
忘 が 起き た みた い 。 こ の ゲー 
を や っ て る とき に ホ ポント に 
地 岩 が きだ た ら お も し ろ い か も 。 
文 参 考 「 マ イコ ン BASIC マ が 
ジン 」83・8,『3D-CARRACE,」 


一 変数 リス ト 

T( )…… 効 果 音 先頭 番地 

に con プア イター の 似 置 
D…… フ ァ イ タ ダー 消去 の 位置 . 
( う sueeisiwo : ズ ニー リア 
H……PICK( キ ー 入 力 ) 


O.W…… 爆 発 時 の キャ ラフ マヤ 


お …… 読 み 込み 用 
人 A As 汎用 
田 プ ロ プ ラム の 説明 (BASIC) 


度 の う 点 ン 
は ケ も コ 北 
も | わ な ン 海 
う ム けけ い ク 道 
と の スラ | 
キ R われ キ フ 市 
レ G か | の R 
イ B ら 部 な 高 
な で ん に い 校 
ゲ 見 性 人 こ 1 
| る 格 部 と 年 
ム と を し か の 
を すし て ら 私 
作 ご て し は 
リ りく い ま か 
た 地 ま つっ ん 学 
い 味 す た の 校 
) と 共に 
今 こ い 通 パ 


POKE 9.9:CLS:T(9) =$7929:T(1)=$ も 792C:T(2)=$ も 792F:F=$C3B9 :G=- 18 
TEMPO_89:LOCATE 9.1:PRINT の ESPC( 1) 
LOCATE 1.9:PRINT "SCORE ":GiSPC( 6 ) :"[ 上 HOLE ファ イト 21]":GOSUB 159 
R 9 M て ター の の へ の いこ の の の の の へ と へ この この へ クン い つこ 
D=F:PICK _H:F=F+(H=28 ) -(H=29) :J=USR($7999,D) : K=PEEK(F ) : し =PEEK(F+1 ) 
り =USR($7918,F):PLAY "B",T(V) : RANDOMIZE:IF K<>L THEN 86 
V=INT(RND( 1 )x3):POKE $7919.31+V:G=G+1:LOCATE 6,9:PRINT Gi"m ":GOTO 59 
Q=$1C:W=$ も 9E:FOR A=1 TO 39:SOUND 699., 1 
POKE F,Q:POKE F+1.Q:POKE F+32.Q:POKE F+33,Q:SOUND 799,1 
POKE F,W:POKE F+1.W:POKE F+32,W:POKE F+33。W:NEXT 
LOCATE 9.8:PRINT SPC(49):"G AME OVE R":iTAB(137):"HIT ANY KEYII "iTAB(64) 
PICK H:IF H<>9 THEN 19 
GOTO 126 
REM XXxxxxxooxxxxOXxXxOOX 
RESTORE 179:FOR A=$7999 TO $7931:READ S$:POKE AJVAL( "も "+S$) : NEXT 
FOR A=$D998 TO $D927:READ S$:POKE A,VAL("$"+S$) :NEXT : RETURN 
86.29.a7.99、a7.91,a7.29,a7,21,ce,cC3,de,a6.99。a7:REM $70090 
29,99.8C,cC1。1f,26.f6,39,.86,.91,a7.99.86.92,a7,.91:REM $7916 
86.93,a7,29,86.94.a7,21.39,12。1.9,12,3,9,12,5。9:REM  $7929 
91,93.96,.94.94,95,cC7,cf ,99,89,cC9,49,49,49,C6,e6:REM $dg08 
db,fb,fb,fb,fe、c7,ca,12,b6,be,be,be,be,c6,a6,99:REM $dg18 


10 初期 設定 ・150 マシ ン 語 デー タ 読 み * 702A- や 7033 効果 音 デ ー マ 
20~30 画面 作成 込み ・ $DO08~$D027 ファ イタ ー デ 
50 ファ イタ マー 消去 位置 ・ 160 ファ イマ ター グラ フィ : ー タ 左上 、 左 
設定 ・ キ ー ス キャ ン ・: ツ フ デー タ 読 み 込み : 下 、 右 下 
USR( フ ァ イ マ ー 消 : 170~190 マシ ン 語 デー タマ : 田 チ ェ ッ フ ボ ポイ ント 
去 、 下 ス フ クロール)  * 200-210 ファ イタ ー ブ ラ フィ ・ ス フ ロ ー ル ゲー ム で も 、 こ ん 
60 USR( フ ァ イ マ ー 表 ・ ッ ツク デー タマ ・ な に 全体 が 揺れ る と な ん と も 難 
示 )・ 効 果 音 ・ 衝 突 判 : 軒 プ ロブ ラム の 説明 (マシ ン 語 ) ・ し いも の で す な 。 ブログ ラム 自 
定 ・$7000 て お 7009 ファ イタ ー 消 : 体 に は これ と いつ て 文 名 は な い 
70 穴 を 揺らし て 動か す ・: 去 ・ けれ ども 、 ど う せ ね な ら い 色 気 
スコ ア 表 示 ・$700A こ $7017 下 ス フロ ー ル : を 付け て ほし か つた だ ね な 。 
80-100 爆発 ・ お 7018 て お 7029 ファ イタ ー 表 ・ 娘 バッ チリ 賞 。 
110 こ 130 ゲー ハム オーバー 処理 ・ 示 


/ う 


00 ど -/*@ 


CM 
。 人 人 弄 + 
MD 佑 若 日 
6 「 剛 1 HHHHHHHHHHIHH 
誠 0 0 2 HHHHHHHHH 欄 較 ン HHHHHH FT u 
半 細 訟 も HHHHHHHHHHUIHHH マン Hp まま I 帳 
生き 二 HHHHHHHHHHH 上 5 すす ! 
和 論 2C0 を = 浮間 。 華 人 
人 っ kN )) さ | 昌 + ド J Hi 秋 尋 日 
2 トト へ ン | つ 財 下 . 
IO NN | 「 主 [| HHRHHHHHHUI 
る 内 へ 訓 9 | 商 計 は HL HI る 、 1 aw 四 8 8 トド 二 1 l 
ウ  。 1 HHHHHHHHIR ' 瑞 L. . ili 財 ト 
思 AN AN 映 の 0 5 FTHL HHR 共 7 帝 人 HHHHH | 環 1 1 
ー ae ky く 8 の 江 El THHHH ト 光 
ゃ Oo ゃ で つこ と ビ 上 - 是 。 W L | | 
っ つり 26 ヽ Q HH IFHHHI 『 こ J 
人 0: 還 に ITHHHHHHHHRIHHHHH 了 | | 昌 』 
つり う 、 内 3 い ヘン Pt か 9 1 に * 昌和 
二条 岬 K 上 | 較 HHHHHHL 
1 23 凍 iih 
タン きも し 2 に 2 和 彰 媒 瘍 潤 
2 時 | 9 | | So | 
人 HHHI < l 
2 NHNTHHTTTTH 田 山 員 
- X JE p HHHHHHH 上 肖 昌 
\ っ ー ア 1 . て へ 1 | 1 
は mrirind。 
が 3 HH 上 3 THHHHHHHHUH 1 
> 叶 RK No se HHHHHHHHHHH[ 
ン 会 PS 1H HLF 
ゃ ンク 1 つの av の た h NM Sel uH 中 
5 多々 公 OS 3 sae | 
\ 拓 。 利 S 全 1 っ S 。S 半 の の 4 きき | 
人 導 り ノー < 6 に っ 本 訴 ト つ - 
0 まま ね 時 TUTTI 
WP \ フ SN 軸 な リ B ロ 2J > フ 了 や) 愉 ォ フ 財 0 咽 才 1 TTYT T 1 Hi 
ICN < うこ 0 し アデ) へ こ ーー 8 
を 生ま たま すま も を ます と TDD 
5 と 1 ソ を に - つ 1 いる で 2 ュ ア 
た ベト つ S し きち っ (0 | MP 
時 - の で / 0 ヘー 昌 G 突 史 せ 
> で >6 臣 * 一 | J つ せ ムロ 8 っ S で 事 失 6 
ー ラ 福 P ト 0 1 つう つ で せつ で 
0 破 じ ふ ネ 。 っ 織 
っ 導 所 ふい る う や 計 INC-tCk 間 
09 0 曜 に よき 沈 ーー、 つ ュ っ の KW 6 AM ぐ 
りり 業 で MIN ヘン Bi NN | 
3 い 〇 ヾ NN -R \ S、 | O 9 ん ルー ュ 6 ( 
ー) ルク ー9 SN td 人 の で で 必 和 
Sss 2 こと の 
の の て か / ト に ^ ヘ 
まま KbRE ま 1 S く R ふ $) な CS | 
9 ne.( 介し うき さつき Se | 3 PO 1 
TN ミー 人 < で ン Cy ww 1 剛 | 措 | へ ヽ 0 Ia 雪 む や を 
2 ※ く ー で っ いや 衛 ロ 
まま RS 
ます を ます すま も い ド 
過 い o( ノ 4 い づり 本 Py 田 コ 9 ー、 ^ ヽ ご 0 We 0 
7 で 宗 Se 3 6 0. 0 
FNS ジ < べ ヽ (⑳ | 映 ー 本 ) 1 
中 ト ワ い | 巡 必 公 - 導 LN 要 1 
の 拉 ん fm 
間 ワ 還 2 RS 


の CC だ ZIA7 
の と /7 ビ アア 戸 


19 CLEAR 399,&HE8099 449 DATA9F3C9EA9993D29FC7BFEAA3994FE9639 
29 SCREEN 1,2.9:WIDTH32:COLOR 15,9.1 459 DATA999E29739973997399733C1CFEB9299A 
39 DEFINT A-Z:DEFUSR=&HE899 :DEFFNA=PEEK( &H 469 DATAED5F9F9F9FE69F571E99ED5399F3ED5B 
3/ ) 479 DATA92F3219BEF7AFE953894D69518F83C9E 
49 FOR I=9 TO 54:READ A$:FOR J=9 TO 15 489 DATAA99699993D29FC7A9E9699D69539FB7B 
S9 POKE 8&HE899+IX16+J,VAL("&H"+MID$(A$,Jx2 490 DATAFEAA3994FE9639997323732373237323 
あま の 2 JJ S599 DATA733C1CFEB9209BED5FE61FFE1439F857 
69 NEXT:NEXT “ S19 DATA1E99ED5392F32A7DF329ED5F47BC391B 
79 READ A$,B$:A$=A$+B$:B$="" ' S29 DATA3A7DF32149F9A85F1699191936292196 
689 FOR I=9 TO 31:B$=B$+CHR$(VAL("&H"+MID$( S39 DATAF9961811299936AF1919FBDD21FFF2DD 
A$, TIx2+1 .2) ) ) : NEXT S49 DATA7E99FE952994DD369929FE852944DD7E 
99 SPRITE$(9)=B$:SPRITE$( 1 ) =B$ S59 DATA29FE29299ADD77993E85DD77291833DD 
199 FOR I=9 TO 5:READ D$:FOR J=9 TO 7 S69 DATA7EFFFE29299DDDBE91291BED5FE64928 
119 VPOKE 1152+Ix8+J,VAL("&H"+MID$(D$,Jx2+ S79 DATA991813DD7E91FE2929183E29DD77993E 
29 ) S89 DATA85DD7791189C3E29DD77993E85DD77FF 
129 VPOKE 1499-1Tx8+J,VAL("&H"+MID$(D$、J2+ S99 DATADD2BDD2BDD7CFEEF29A52199F3ED5B7D 
1.2)) 699 DATAF396972B7EFE8529951313CDE9EA19F3 
139 NEXT:NEXT 619 DATA96972B7EFE85299413CDF7EA19F496096 
149 A=&HF999:B=&HAF 629 DATA2B19FD96962B7EFE8529961B1B1BCD9E 
159 FOR I=9 TO 767:POKE A+1 .32:NEXT 639 DATAEB19F2ED537DF396969E992B7EFE8529 
169 FOR 1=9 TO 4:FOR J=2 TO 23 649 DATA919C19F779327CF321C9EA11E9F201269 
179 POKE A+Ix6+Jx32.B 659 DATA99EDB92199F9119918911999CD5C9921 
189 NEXT:NEXT 669 DATA29F9112918911999CD5C992149F91149 
199 FOR I=9 TO 4:FOR J=9 TO 24 679 DATA1891C992CD5C99AFCDD5992179F31172 
299 POKE A+IxX169+J+64,B 689 DATAF3916299EDB8ED5B12F3FE912898FE92 
219 NEXT:NEXT 699 DATA2894FE9829931D1D1DFE922898FE9328 
229 POKE A BiPOKE A+24.B 799 DATA94FE942093141414FE942898FE952804 
239 POKE A+32.B:POKE A+56,B 719 DATAFE9629931C1C1CFE962898FE972894FE 
249 FOR I=&HF319 TO &HF372:POKE 1I,24:NEXT 729 DATA9829931515157BFEA938921EA9FE1839 
259 POKE &HF399,&HAF:POKE &HF391 ,9 739 DATA921E187AFEB4389216B4FE98399216098 
269 POKE &HF392.&H9F:POKE 8HF393,9 749 DATAED5319F37BB2435F3E94CD9399587B21 
279 VPOKE 8&H2912.8HA9:VPOKE 8&H2915、8&HA9:VP 7S9 DATA991BCD4D99237ACD4D9923AFCD4D9923 
OKE &H2019.8&8H76 769 DATA3E95CD4D99ED5B79F37B23CD4D997A23 


289 PLAY"T8904L16V19CCFR32F32A05C2L3204A+R 779 DATACD4D993E9423CD4D99233E99CD4D99AF 
32A+R32A+R32L1605CCER32E32FFFF " , "T8903L16V 789 DATACDD899A72996AF327FF3183F3A7FF3A7 
7CCFFAC2AAACCEEFFFF " , "T8902V7L16ECECECECGD 799 DATA29393C327FF3ED5B79F3CDA4EADDE5FD 


GDGDGDAFAFO3FFFF 899 DATAE1ED5B19F3CDA4EACD25EB9E949695DD 
299 Z=USR( 9) 819 DATA7E99FD5699FD7799DD7299DD23FD2319 
399 LOCATE 6、12:PRINT "%※X%X START XX※※" 929 DATAEE1 1 1B99DD19FD199D29E2E1ED5B7DF3 
3419 LOUCATE 28.0:PREKINT SGgoYe"LOCATE 25。17 839 DATA722B73C9DD21BBEF7AD694919699DD99 
PRINT" M 949 DATAD63939FA7BD6149EA9DD99D62839FAC9 
329 IF PLAY(9)=-1 THEN 329 8959 DATAAF4F56455229AF292D293329AF292039 
339 SOUND 19.8:SOUND 5,9 869 DATA2929AF292B203129AF292B2932292929 
349 Z=USR(Z):LOCATE 25.1:PRINT Z 679 DATAD9AF1E9ACD93993E9 11E99CD93993E9C 
359 IF FNA=9 THEN 349 989 DATA1E18CD93991842D9AF1EC8CD93093E9 1 


369 PLAY"T129V9L1605BAGEBAGEO5CDEFGABO6CC4 899 DATA1E99CD93993E9C1E94CD9399182BD9AF 
1T129V804C4E4G405C2" 。"T129V703L16CR16CR1 399 DATAIE64CD93993E911E92CD93993E9C1E20 
6CR16CR16CCCR16C4 ." 919 DATACD93991814D9AF5FCD93993E911E95CD 
379 LOCATE 4,12:PRINT"Xxx GAME OVER XXx" 929 DATA93993E9C1E32CD93993E931E99CD9399 
389 IF Z>H THEN LOCATE 8,14:PRINT "YOU ARE 339 DATAEDSFC6895F3E92CD93991EF83E97CD93 
TOP 1 53H=Z ELSE LOCATE 6、14:PRINT “ 中 GR 949 DATA993E981E19CD93993E991E19CD93993E 


SCORE" 5H 959 DATA9A1E98CD93993E9D1E99CD9399D9C990 
399 IF INKEY$> く CHR$S(13) THEN 399 969 DATA39381C9F97999E37395E66791D9B9109 
499 CLS:GOTO 149 379 DATA99949C9C9CFC7CBCBC7CFCF8F8F9E990 
419 DATA23235E2356ED537DF3E53E853291F921 389 DATADFDF99FDFDFD99DE , D7DF99DDE8BD99DA 
429 DATAE9F2962936292319FBED5B99F321C9EF 399 DATA55DE99DD69BD995A, 448A99D59989994A 
439 DATA7AE6933C9E969699993D29FC7AE609C9F 1999 DATA44829991998199092.99999999999900990 

一変 数 リス ト ・ 410-950 機械 語 デ ー タ ス 
Z…… ス コア : 960-970 スプ ライ ト デ テー タマ 軸 
H…… ハ イス コア ・ 980 一 1000 キャラ フタ ・ デ ー タ 回 EE = 
較 プ ロブ ラム の 説明 ・ 還 チ エッ フ ボ ポイント ん 
1030 初期 設定 ・ 全部 打ち 込ん だ ら マ シン 語 確 パ バ に 
40 一 60 機械 語 書き 込み  : 認 。 restore 400:S=ー4501: ツ W Ei 
0 一 90 スプ ライ ト 書 き 込み : for j=0 to56:read do$ : だき に 埋 
100-130 キャ ラフ タ ジ ェ ネ レ ・ for 」=0 to Zs=sx or v 上 計 記 。 

ー マ ダー の 書き 込み : alC&h'+midS(d お J* オ +1. の 四 計 証 
140 一 230 画面 設定 ・ nextinext:print s:end て 本 
270 色 指 定 :・ を 打ち こみ リタ ー ン ・ キ ー。O 四 回 回 
280 ミコ ュー ジッ フク ・ が 表示 され だ ら OK。 ぞ "モーー 

3 


290-400 メイ ン ル ー チ ン 


W 
間 UM 


WWWWWW 


ww 


4 方 向 か ら バグ が 

Z-80A に 襲い か か ' っ 川上 
0 ーッ | MT 上 

の) 、 8 ル ・ キ ー で ス ュ コープ | 議 THHtHHHHtHT 

バン ンス 遊び 方 人 | 目 uu / 

あの いま わし い バ グ が つい に 実体 化  ・ キ ー て 退治 し よう 。 eeellmmm 

し て 、Z-80A に 襲い か か っ て くる / で も 、 ス コー プ は 加 


RUN す る と 、LSI の うえ を コイ ン が 速 が つく の で ちょ っ 
回 転 し な が ら 移 動 す る デモ 画面 。 こ れ と 操作 が 難し い ぞ 。 


な か な か カッ コ い いよ 。 ジ ョ イス ティ イ と きど き 、 あ る ポ 
ッ ク か キー ボー ド か を 決め た ら ゲ ー ム イン ト を 撃つ と スペ 
スタ ー ト 。 シャ ルフ ラグ が 出 て 


エク スト ラ 追 加 。 ト 
ジン の うん 信 出 区 


いく t 3 肖 くる コイ ジ を 撃つ と 

ぱっ し 基 い の ボー ナス 1000 点 だ 。 0 章 せ 8 

に いこ の で ロ バグ が の -80A を 5 MGM 

う 3 ゲ 革 テ ラ | 回 何 生 6 ゲーム 

し に ム 昌 ノ は オー バー に な る 。 を 3 Il 

っ の そ い り ナ れ か ら 自 分 で 選 -80A = | 

4 0 の か ら 和 注意 し ょ う 。 

い ババ し を る か 打ち こみ バグ に も MIU 「 

1 uu 注意 し ょ うお ね 。 ム や られ だ ! ご この スコ ー プ 、 操縦 が 難し いん だ よね 。 
一 変数 リス ト OGA ステ デ テージ 数 ・ 170 一 410 画面 設定 ん と いつ て も 場面 設定 が いい 。 
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SR,DXJDY…… デ モ 用 MX.MY…… ミ サイ ル の 座標 ・ 700-740 爆 発 処理 ・ ヤル フラ グ 、 ボー ナス コイ ン と 
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CH…… バ パプ の キャ ラク マタ ・ 140-160 キー ボー ド Or ジ ョ イィ : ゲーム と し て は 普通 の シコ ー : な に 少な ひつ だ け や 娘 パッ チリ 
LF…… 自 分 の 残り ・ ステ ィ ッ クマ ・ ティ ング ゲー ム だ けれ ども 、 な ・ 賞 。 
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ヽ ツ ェ ッ ル ノ ル 坊 主 み た いな 


秋 に ぴっ た だ たり と いえ ば びっ た り の ゲ 
ー ム 。 源 死 の 蝶 が 出 て くる あたり 、 い 
が に も そん な 感じ 。 よ ーー《 考 える と 、 
ちょ っ と 残酷 な 気 も する な 。 

いや いや これ は ゲー ム だ か らし て 、 
を ん な 私 情 は は る ん じゃ いけ な い 。 と 
に が て く 、 和 キミ は クワ ガタ 貝 / と どー だ 、 
まい っ だ か 。 そ し て 、 キ ミ は 蝶 を 食べ 
て ポイ ント を か せ ぐ の だ // 移動 は カ 
・ー ツ ル ・ キ ー ま だ は ジョ イ ・ ス ティ イッ 


嘩 (Y 


ン 
ゝ ヽ 引出 


は う きき は き に さと び へ 必 本 / 寺 半 
A へ ご 。 届 人 は 三 党 さ へ 」 


J 計 へ 員 と の とい 壮 還 き ポレ 計画 
AS は J 革 和 ま 詩 同 技 に NN ロ NLS(( 。 和 


と 2 

り 
仙 
井 
と 

い 
う 

名 
ーー 
を 
他 
の ) 
に 1 
で 


まず は 2 匹 の カブ ト 是 。 こ いつ 
つの よる か とら 1 ウン る し る 。 
木 の 横 か ら 舌 を 伸ばし て 《 る カメ 
レオ ン 。 この 舌 に 触れ て も 1 匹 ダ 
ウン だ 。 る 区 ダウ ソン て ケー の オー 
も は AA ペー スッ キー (まほ 
だ た は ジョ イ ・ ス ティッ ク の トリ ガ 
ー) で 、 1 匹 に つき 3 回 まで ワー 
フ で きる 。 せ い ぜ い 活用 し よう ね 。 


ノノ / 


ム 元 棋 か ら カ メレ オン が スル スル .…… と 舌 を の ば し て きだ 。 ヤ バイ / 


一 変数 リス ト ・ X( )…… カ ブ ト ムシ の X 座 標 '・ 1330-1390 ゲー ム オ ー バ ー 
HS…… ハ イス コア ・ Y( )…… カ ブ ト ムシ の Y 座 標 ・ 1400-1420 スコ ア 表 示 
S…… ス コア ・ 較 プ ロブ ラム の 説明 ・ チ ェ エッ フ ボ イン ト 

A…… フ ワ ガ マ の X 座 標 ・ 60~-220 初期 設定 ・。 ほのぼの と し た ゲー ム で す な 。 
B…… フ ワ ガ タ の Y 座 標 ・ 230 一 430 木 を か ぐ ・。 ちょ つと プロ グラ ム が あつ ち 
A2…… チ ヨウ の X 座 標 ・ 440-500 スプ ライ ト 定 義  : こつ ち に 飛ん で いま すね 。 ス プ 
B2…… チ ヨウ の Y 麻 標 ・ 510~1180 メイ ンプ ログ ラム  : ライ ト の デー タダ は 一 番 後 に 、 ま 
B3…… カ メレ オン の Y 座 標 ・ 1190-1280 スプ ライ ト デ ー タ ・ だ スコ ア 表 示 の サブ ルー チン は 


7 ど 


ゲー ム 中 、 一 定時 間 ご と に 動き が は 
で が か の て ンチ に だ な る だ だ し ポポ 4 
ク だ 。 で も 、 敵 は 多い ぞ 。 ント は 10 点 プラ ス ) の で 、 注 意 / 


メイ ン ル ー チ ン に 入れ だ ぼう が 
いい で し よう 。 

940 行 1010 行 あ を り の キー 
入力 処理 な ど は 論理 式 を 使い 、 
まだ その 後 の |Fー THEN の 山 
も 整理 すれ ば も うつ ち よ つ と 早 ぐ 
な る の で は な いか ガ が な や 支 ヨ ッ シ 
ャ 賞 。 


の と だ ZI ル 7 
の と 7 アア 


1 '※※※ 区 区 区 ※※ デ ※ 光 光 光 区 区 光 光 光 区 


29 '※ クワ カ ~ ッ タ ン 3 
3 '※ by Tomonori Itsui 
4 '※ 1984/8/27 ※ 


OM '※※%※※※ 光 ※※※※※※※※※※※ 区 XX 区 
69 SCREEN 1:KEY OFF 
79 LOCATE 6,1:PRINT "%※X%X※※X※X※X 光 XX※※※" 


69 LOCATE 6,.2:PRINT "※xx ※※※" 
39 LOCATE 6,3:PRINT "XX※ クワ カト ッ タ ン %※※" 
199 LOCATE 6,4:PRINT"x※xx ※※※" 


119 LOCATE 6,.5:PRINT "XX※※※ 光 XX※※" 

129 LOCATE 5,9:PRINT" ト ^ チ ラテ ^~ PLAY シマ スカ 92" 

139 LOCATE 5,13:PRINT "キー- ホ トー ト * >>> PUSH 9" 

149 LOCATE 6,15:PRINT "ステ ィ ッ ク >>> PUSH 1" 

159 IN$=INKEY$ も : IF IN$="9" THEN ST=9:GOTO 189 

169 IF IN$="1" THEN ST=1:GOTO 189 

179 COLOR (CL MOD 5)+3,.2:CL=CL+ 1:FORI=1TO059:NEXT :GOTO 159 

189 SCREEN 2,2.9:COLOR 15,1.,1:CLS:R=RND( -TIME ) :COLOR 15,1,1:KEY OFF 
199 HS=9:PP=3:S=9:W=3:B3=199:AL=17:AX=1:AZ=9:P=PP 

299 DIM X(29) ,Y(29) ,C( 29 ) , V( 2 ) 
219 OPEN "GRP:" FOR OUTPUT AS #1 
229 PLAY"S1 4M399L64" 

239 LINE(17,.9)-(175,191 ) ,19。BF 
249 LINE(178,191 ) - (255,169) ,10 
259 PAINT(255,191 ) 。19 

269 LINE(176,1099)-(255,5) 。19 
279 LINE(176,159)-(255,。55) ,109 
289 PAINT(259,15),19 

299 FOR 1I=19 TO 255 STEP 14 

399 FOR U=1 TO 3 

319 M=RND( 1 )x151+45 

329 LINE(1I,M)- (TI,。M+RND( 1 ) x5+5 ) , 1 
339 NEXT 

349 NEXT 

359 X=29g:FOR I=9 TO 5 

369 CIRCLE( X, 20 ) , 3 , 2 

379 PAINT(X+29 , 29 ) , 2 

389 X=X+35 

399 NEXT 

499 CIRCLE(233,49) ,69,2.2,1,.6 
419 PAINT(239, 69 ) 。2 

420 CIRCLE(243.151) .72.2,。、。6 
439 PAINT(249, 149) ,2 

449 RESTORE 1199 

459 FOR RE=9 TO 2:G$="" 

469 FOR AD=1 TO 32 

479 READ CH$ 

489 G$ も =G$S+CHR$ も (VAL("&H"+CH も ) ) 
499 NEXT 

599 SPRITE$( RE ) =G$ 

S19 NEXT:FOR P=2 TO 3:SPRITE$(P) =G$:NEXT P 
S29 RESTORE 1259:FOR RE=6 TO 7:G$="" 

S539 FOR AD=1 TO 32 

549 READ CH$ 

oS59 G$ も =G$+CHR$ も (VAL( "&H"+CH$ ) ) 

S69 NEXT:SPRITE$( RE ) =G$: NEXT 

S79 PSET(185,29) ,2:PRINT# せ 1 。 "HI-SCORE" 

S89 PSET(185,59) ,2:PRINT1 , "SCORE" 

っ S99 PSET(185,139 ) ,2:PRINT1 , "クワ カ ^ タ " 

699 PSET(185,169) ,2:PRINT 后 1 , "ワー フ ? " 


619 S=9:Q=4:W=3:Z=3:B3=199:AL=17:AX=1:AZ=9 
629 PLAY"04CDEFGABO5CDEFGABO6CDEFGABO7CDEFGABO8CDEFGAB" 

639 T=9:LINE(249,169 )-(259,179) ,2,BF 

649 PSET(241,169) ,2:PRINT#1 ,"3" 

659 P=PP:FOR I=2 TO P 

669 X(I)=INT(RND(1 )x]45)+29:Y(I)=INT(RND(1)x79):V(I)=INT(RND(1)x8)+4 

679 NEXT 

689 A2=INT(RND( 1 )x145)+29:B2=INT(RND(1)x79) :V=INT(RND(1)x8)+4 林 
699 A=95:B=179 「 < 
799 P=PP ・ 


719 IF Q<}1 THEN Q=4 

729 LINE(219,39 ) - (255, 38 ) , 2 、BF 
739 PSET(295,39 ) , 2:PRINT#1 ,HSx16 C〉 
749 LINE(238 , 1 39 ) - (259, 148 ) , 2,BF 


HHEEHHHHEEE XpWe 


の ー ミ ソン 大 障害 競馬 カシ オ (03-347-4830) MSX( 8 K) や ROM カ ー ト リッ ジ Y\4.,800 人 自分 の 馬 に ハチ を あて て ジョ ヨッ ツキ ー 気 分 
sy た が 楽し め る く ジ ヨッ キー モー ド >〉、4 人 まで 競馬 の 予想 が 楽し め る < く ベ ツ ッ ト モー ド 〉> が ある 。 グ 2 通り 楽し め る 競馬 ゲー ム だ 。 7 ツ 


へ 全 S 選 共 S へ 眉 隊 mmm へ J 尽 へ ぶ こ eS HgtH9t し dm 司 SHN 壮 は NN 中 党 〈) 


くわ が っ た ん リス ト 続 き 


759 PSET(233。139) ,2:PRINT 拉 1 ,W 
769 GOSUB 1499 
779 FOR K=9 TO 29 


789 PLAY"S11M599L6407C":PLAY"S14M399L64" 


ぎの 


799 FOR I=2 TO P 

899 PUTSPRITE IT,(X(T),Y(1)),4 

819 PUTSPRITE 6,(A2,B2) ,13 

829 B2=B2+V:A2=A2+INT(RND(1)※19)-5 

839 IF A<X(I) THEN X(IT)=X(1)-V(T)/Q _ ELSE X(I)=X(T)+V(T)/Q 

849 IF A く <A2+12 AND A>A2-12 AND B く <B2+7 AND B>B2-29 THEN S=S+S5:GOSUB 1499:PLAY “の 「。 
"9 "L64S11M19908CD":A2=INT(RND( 1)%145)+29:B2=-16 

859 IF A<X(T)+12 AND A>X(1)-12 AND B く <Y(I)+7 AND B>Y(1I)-15 THEN PUTSPRITE I,(X(1) 
5Y(I)),4:GOTO 1299 

869 PUTSPRITE 7,(9,B3) ,2 

879 IF AX=1 THEN LINE(17,B3+8)-(AL,B3+8 ) , 8:AL=AL+109 

889 IF AL>169 THEN LINE(AL,B3+8)-(17.B3+8) ,19:AL=17:AX=9:AZ=9 

899 IF B+16>B3+8 AND B く <B3+8 AND AL-109>A THEN 1299 

999 R=STICK(ST ) 

919 Y(T)=Y(I)+V(I) 

929 ON R GOTO 949,959.969,979,989.999,1999,1919 

939 GOTO 1929 

949 B=B-4:T=T+1:GOTO 1929 

959 A=A+4:B=B-4:T=T+1:GOTO 1020 

960 A=A+4:T=T+1:GOTO 1929 

979 A=A+4:B=B+4:T=T+1:GOTO 19209 

989 B=B+4: 征 =T+1:GOTO 1929 

999 A=A-4:B=B+4:T=T+1:GOTO 1929 

1999 A=A-4:T=T+1:GOTO 10929 

1919 A=A-4:B=B-4: 征 =T+1:GOTO 19290 

1929 IF =2 THEN = の 

1939 IF T=9 THEN PUTSPRITE T,(A,B),6:PUTSPRITE 1,(256.192),1 ELSE PUTSPRITE 1。(A 
。B),6:PUTSPRITE 9,.(256,192 ) , 1 

1949 IF STRIG(ST) AND Z<>9 THEN PLAY"07FEDC" :Z=Z-1:A=INT(RND(1)x159)+29:B=INT(RN 
D(1)x174):LINE(239,159)-(259,168) ,2,BF:PSET(233,169),2:PRINT#1 ,Z 

1959 IF A< く 3 THEN A=39 

1969 IF A>155 THEN A=155 

1979 IF B<29 THEN B=29 

1989 IF B>179 THEN B=179 

1999 IF Y(I)>199 THEN X(I)=INT(RND(1)x145)+29:Y(I)=-16:V(I)=INT(RND(1)*8)+4:C(1) 
=INT(RND( 1 )x13)+2 ELSE 1199 

1199 IF B2>199 THEN A2=INT(RND(1)x145)+29:B2=-16:V=INT(RND( 1 )X8)+6 

1119 IF AX=9 THEN B3=B3+INT(RND(1)xX6)-3:AZ=AZ+ 1 

1129 IF AX=9 THEN IF B3>B THEN B3=B3-4 ELSE B3=B3+4 

1139 IF AZ>19 THEN A=1 

1149 IF B3>175 THEN B3=175 

1159 IF B3<59 THEN B3=59 

1169 IF B2>199 THEN A2=INT(RND( 1)x145)+29:B2=-16:V=INT(RND(1)X8)+6 

1179 NEXT:NEXT 

1189 PLAY"S8M39907CDE" :PLAY"S14M399":P=P- 1 :S=S+1:IF P=1 THEN Q=Q-1:GOTO 799 ELSE 
719 

1199 DATA 8,18.1C,18,.C,7.F,CF,39.E,3F 、CF ,、F、F、37 、C3 

1299 DATA 19,18,38,18,39,E9,F9,F3,C。79,DC,D3,D9 ,F9 ,AC,C3 

1219 DATA 2.6、7.6.8、7,F,F,C0,。3E.P,3P、CF,3F,C7 3 

1229 DATA 49,69,E9,69,C9,E9,F9.F9,3,7C,D9,DC,D3 ,FC,A3,CW 

1239 DATA 83,.6F,1F,1F,9F,7F,1F,1E,79,8F,3,1.3E。12。4 

1249 DATA C1,F6,D8,F8.E9,EE,E8,78,E,F1 ,C9 ,89,C9 ,79,48.20 

1259 DATA 18,3D,7D,FF,F3,F1,7F,F,79.F1、E3,E7 ,FD,FA,F2,69 

1269 DATA 18,BC,BE,FF,CF,8F,FE,F9,9F,8F,C7,E7 ,BF , 5F,4F,6 

1279 DATA 91,31,.71.67,CF,DF,DF,FF,7F,3F,7F,FF,FF,F9,FE,7F 

1289 DATA F9,F8,FC,FE,CE,DF,CF,F8,FC,FF,FE,FC,E9,E9,FC,7E 

1299 PLAY "" "0"L64S13M19906BAGFED":FOR D=9 TO 19:FOR T=9 TO 1:PUTSPRITE T,(A,B 
) 。6:FOR 0=9 TO 69:NEXT:PUTSPRITE T,(255,191),1:NEXT:NEXT:W=W-1:2= さ 

1399 LINE(239, 139 ) -(259, 148) ,2,BF:PSET(233,139) ,2:PRINT#【1,W 

1319 IF Ww=9 THEN PSET(39,19),2:PRINT#1 , "GAME OVRE":PSET(39,29):PRINT 失 1 PREPLAY 3? 
(Y/N)":GOTO 1339 

1329 PLAY"O6CDE":GOTO 639 

1339 IF S>HS THEN HS=S 

1349 FOR I=9 TO 6:PUTSPRITE I,(255,191),1:NEXT 1 

1359 IN$S= INKEY$ 

1369 IF IN$="Y" OR IN$="y" THEN LINE(28,19)-(159,.39) ,2.BF:LINE(17,B3+8)-(AL,B3+8 
) ,19:AL=17:AX=9:AZ=9:GOTO 619 

1379 LINE(17,.B3+8)-(AL,B3+8 ) ,19:AL=17:AX=9:AZ=W 

1389 IF IN$="N" OR IN$="n" THEN CLS:END 

1399 GOTO 1359 

1499 LINE(219,69)-(255,68) ,2,BF 

1419 PSET(295.69),2:PRINT 村 1.Sx19 

1429 RETURN 


WWWW 
UM 
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遊び 方 

キミ は 右 下 の 赤い 点 。 上 
が か がら や っ て (くる 敵 の ミサ イ 
ルル を が お わし て で 。、 て る る だ けり 
長い あい だ 飛び まわ ろう 。 
移動 は テン ・ キ ー が だ 。 

壁 や 山 や 敵 と ぶつ か っ た 
ら 1 機 減り 、2 機 失う と ゲ 
ー ム オー バー。 

敵 の ミサ イル は キミ を 追 
っ か け て くる か ら 、 ま ず は 
ひたすら 逃げ まわ る こと を 
えん よう 。 

うま く 診 導 し て 敵 を 真中 
の 山 に ぶつ けら 5 れ だ ら 、 ボ 
ー ナ ス 点 も も ら え る ぞ 。 

キャ ラク タ は た だ だ の 線 し 
が で て ここ が (MC0 だ お 、 じ っ 
と 見 て る と 小さ な ミ サイ ル 
に 見 えて くる か ら 不 因 


一変 数 リス ト 
AB…… 自 機 の 座標 
C,D…… 敵 ミサ イル の 座標 


田 プロ ブラム の 説明 
1 初期 設定 ・ 画 面 設定 


の 
【】 
@ 
【】 
@ 
@ 
@ 
@ 
人 
ト 】 
人 の 
@ 
@ 
の 
@ 
【 】 
ト 】 
の 
L】 
@ 
ト 
@ 
L】 
@ 
L】 


13 一 16 灯 発 ・ ゲ ー ム オー バー 
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人 ム < ャ ゃ 持 〈 く ロ 
ト ーー つつ ! 
い く と 名 

ん コ ん 前 


0 へ 届き 
ロロ へ すっ. ashms ら へ 箇 J 通 | 


に 1 


too 一 コビー 鐘 (トー ミコ) トー we 


へ 尾田 吾 黄 湯 S や ご きど 。( へ で 末 ) 
さ べ の の ーー ビー 識 宙 oko は (トー | 


V >) > 職 HN 吉 0wrv の WS…… 


で 


4 な ん だ が ガ エジプト で 戦 つ て る 感じ 。 


MISSILE ATTACK 


1 CONSOLE 9.25.9.1:CLS 3:CLEAR:LINE (29.19)-(629,179).6.B:LINE (299.179)-(329.19 

9).6:LINE-(499,179),6:LINE (329.159)-(329,299) ,9:PAINT (9.9),6,.6:WIDTH 49、25 

2 A=599:B=169:C=399:D=29:H=2:S=9: BEEP:COLOR 2:LOCATE 29.9:PRINT "HI-SCORE" :HI 

3 LINE (C,D)-(C+E,D+F ) .9:C=C+E:D=D+F:S=S+1:COLOR 1:LOCATE 9.9:PRINT "SCORE":S: IF 
B>DTHENF=3 ELSE F=-3 

4 IF A>C THEN E=6 ELSE E=-6 

S FOR Z=1TO7:IF POINT(C+Z/2+ 1 .D+Z+1 ) =2THEN13 

6 NEXT:LINE (C、D)-(C+E,D+F) ,5: IF POINT(C+2.D+2)=6THEN 12 

7 I=INP(9):LINE (A.B)-(A+AA.B+BB ) 、9:A=A+AA:B=B+BB:AA=AA-2x([=54)+2%(1=52):IF (1= 

S9 OR I=56)THENIF AA>9THENAA=AA-2 ELSE AA=AA+2 


8 IF AA>29THENAA=29 ELSE IF AA<-29THENAA=- 2 

9 BB=BB-(I=59)+(I=56):IF (I=520RI=54 )THENIF BB>9THENBB=BB- 1 ELSEBB=BB+ 1 

19 IF BB>19THENBB=19 ELSE IF BB<-109THENBB=- 19 

11 LINE (A.B)-(A+AA.B+BB ) .2:IF (POINT(A.B)=-1 OR POINT(A+2,B+1 ) =6 ) THEN13ELSE3 

12 FOR Z=1 TO 29:COLOR 2:LOCATE 9.9:PLAY "C32D32":PRINT "本 ^- ナ ス ":Zx19:NEXT :LOCATE 


9.93PRINT " "・ ら =S+299:C=399:D=29:GOTO 3 

13 FOR Z=1 TO 29:BEEP 1:CIRCLE (A,B) ,Z.2:BEEP 9:NEXT 

14 FOR Z=1 TO 5:PLAY "C64D64E64F64G64A64" :NEXT :H=H- 1 :IF H=gTHEN 15 ELSE A=500:B= 
169:AA=9:BB=9:PAINT (39.39).9.6:GOTO 3 

15 COLOR 2:LOCATE 9.9:PRINT "GAME OVER!!":IF HI<STHENHI =S 
16 COLOR 3:LOCATE 9.12:PRINT "HIT SPC PLAY!!":1F INKEY$=" 
:CLS:GOTO 2 ELSE 16 


"THENHFAINT (39 、39 ) ,. 9 .6 


2 変数 設定 、 ハ イス コア 表 ・ 田 チ エッ フ ポ イン ト 


示 ・。 うー お 、 バ パプ と いう わけ で は : それ か ら 爆 発 パ ツー ン を 消 そう 
3 4 敵 ミ サイ ル の 動き 、 ス ・ な い の だ けれ ど 、 気 に な か る と ご ・ と する と き 、 時 々 残 つ て し まう 
コア 表示 ・ ろ が いこ つか ある な 。 ま ざ 再 ゲ : こと が ある けど 、 こ こも どう に 
5 敵 ミ サイ ル の 行 < 先 に ・ 一 ム し て キモ 画 面 が その まま で 、 : か し た いね 。 1 画面 に 納め る の 
な に が ある が 判定  : 穴 ぼ こ が 残 つ て いる 。 こ れ は 16 : は ちよ と 大 変 だ けど ……。 
6 敵 ミ サイ ル 表 示 ・ 行 目 の 後ろ の 方 GOTO2ELS ・ や っ ぱり ヨッ シャ 賞 。 
/~11 自 機 の 表示 ・E16 の 2 を 1 に すれ ば いい の だ ・ 
12 ボー ナス ・ が 、 そ うす る と 今度 は ハイ スコ : 


アガ リア され て し まう か ら 1 


し あず / 


行 の CLEAR も 取 つ て し まお う 。 


WW 
WWWWW 
WW 
WW 


16] 秀 び 方 

2 機 の DM (1 と 2) を 操作 し て 、 
じりじり 攻め 寄っ て くる BH を すべ て 
破壊 し て し まお う 。RUN ぉ る せる と し ば 
らく 説明 画面 が 現れ る の で 熟読 の こと 
(320 行 の 10 を も っ と 大 きく 《 す る と じ 
っ くり 読める 〉 

ゲー ム 画 面 右側 の DM- 1 な どの デー 


mm これ S | 
9%r 持 さき | 
へ は すさ 


| Ce 叶 つと の どり る 呈 商 団 富 AUNI | 
| で HAI ご 商 喜 活 剛 は つき と 2 


| JH へ 4 。 馬 と J 


rlOy attー 人 本 と は つの ペ 還 | 


| せき はめ 定 で き ひ ーーwAANSN 
ニー は 上 へ は 加 eN へ br 藻 貴 は 


し て か ら 、 移 動 


タ は 、 左 か ら 移 動 能力 、 装 甲 圧 、 攻 撃 
力 。 2 行 目 は 方 向 (N、NE な ど )、 を し 
て 座標 ( 諾 が X 軸 、 右 が Y 軸 )。 方 向 と 
座標 の あい だ の 空 折 に は ダメ ー ジ ・ メ 
ッ セ ー ジ が 記号 で 出 て くる 。DM- 2 の 
デー タ は その パタ ン の 繰り 返し だ 。 
BH の デー タ は 、BH- 1 一 6 の 能 
に 続い て 座標 が 表示 され て いる 。dis- 
tance は 、 左 が DM- 1 と 各 BH と の 距 
離 、 右 が DM- 2 と 各 BH と の 距離 だ 。 
移動 する に は 、 ま ず 方 向 キー 1 一 
I6。 これ が NW、 
INJNE、S PE、S ら 
W と 対応 ) を 押 


キー (回 較 国 | 
[SI。 上 記 の 方 
向 と 対応 ) を 提 
し 、 移 動 能力 が 
0 に な る ま て で 移 
動 て きる 。 だ が だ 
し 方 向 が あっ て 
な いと 動か な い 
の て 注意 。 移 動 


一 変数 リス ト 


E5…… 敵 の 番号 
G~G4…… 新 し い 敵 の 座標 
K…… メ ツ セ ー ジ の 文字 数 
MM1 …… 自 機 の 移動 用 
OO2…… 攻 撃 用 
P1.P2…… 座 標 用 


RR1 …… 番 地 の 内 容 
ざ 2 


900-1150 敵 移動 サ プ ブルー チ 


し な いじ ひき は MM キー だ 。 

攻撃 は 攻撃 目標 を 数 字 で 入力 し 、 武 
避 番 号 (1… リ ニア ガン ・ 射 界 100"、 
2… リ アキ ャ ノン ・ 射 界 60") を 入力 。 
結果 は 右 下 隅 の コメ ント 欄 に 出 て くる 。 
攻撃 し な いと き は [2Z] キ ー を 押 そ う 。 
何 度 か が やら な いと ピン と こない か な 。 
文 参考 「DUAL MAGAZINE」『 ダ グラ 
ムシ ミュ レー ショ ンマ ニュ アル No.4』 
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4 な か な が 楽し め る パソ コン ・ シ ミユ レー ショ ン 。 


表示 サブルーチン 


・R2…… 射 撃 の デー タ ・ OS$…… 被 害 の 状況 2 

・S.S1…… ス コア ・ 一 プロ ブラム の 説明 ・1500-2200 自 機 攻 撃 サ ブル ー 
・ 1 て T5…… 座 標 用 ・ 10-220 初期 設定 チン 

・V…… メ ッ セ ー ジ の 番号 ・ 230-300 タイ トル 画面 ・2210-2280 被害 判定 ( 自 機 
・ WW1…… 敵 の 秘 動 力 ・310-320 説明 画面 ・ 敵 共通 ) サブ ルー 
6 ゆく 2 座標 用 ・330 て 440 ゲー ム 画 面 5 チン 

・ YY1…… 座 標 用 ・ 450-490 メイ ン ル ー チ ン ・: 2290~2540 デー タ 表 示 サ ブル 
・B( )…… 敵 の デー タ ・ 500-890 自 機 移 動 サ ブル ー チ ・ ーッ 

・D( )……… 自 機 の デー タ ン 2550-2630 メッ セー ジ 消 去 、 


ン 


1160~1490 敵 攻撃 サブ ルー チ 


2640-2720 新しい 敵 を 表示 す 
の ルーチン 


シミ ュ レ ーション DM GAME (BASIC) 


16 DEF FNK=ASC( INKEY$) 
26 DEF FNP= も 168+P1+ ま 20*P2 

38 DEF FNT=INT((T5- ま も 198) ノ ま 26 ) 

49 DEF FNT1=T5-$198-FNTx を 29 

56 DEF FNQ= も 189+Z+INT((Z-X) *TANCQ) +Y) *26 

る 6 DEF FNQ1= も 189+Zx ま 20+(ZーY) TANCQ)+X 

Z9 DIM M1 を (Z) ,。D(2, の ) ,B(5, る ) ,T(5,2) (る) ,R( 2Z) 

B9 LET M ま (1)="NMI" :LET も (2)=" N" :LET も (3)="NE" :LET も (4)="SE" :LET も (5)=" 8S" 

:LET (る)=" SL" 

9 LET 0*="DDDDFF ト NNN" :LET S1=9 

199 LET NM1$ て 1)=" コ ウケ ^ ま カノ ウ コウ ケ クキ" : し ET 1$(2) ニ "コウ ウ ^ チ フカ ノウ サー ン ネ ン " 

116 LET M1$ ま (3) ニ "テキ ノコ ウケ クー キラ ウフ マシ タ " :LET 1 まま (6 る )=" テ "ロイ アタ トク "ラフ カウ ヤク テー トク リウ テキ タリ 

129 LET M1 も (4)=" 上 カー イア リ " :LET 1 を (5)=" ヒ カ ー イ ナシ 

139 LET M1$ を 〈Z)= ニ "テー ロ イア ター クー ラ と フカ ウ ヤ ク る ナシ クト ~ クリ ラニ ショ マイ シタ " 

149 RANDOMIZE :FOR I=1 TO 2Z:READ RCI):NEXT 1 

159 DATA る, る 6。5,4。3。2。9。9。9。5。5。4,4。3,3。2。2。1。6。4 4。3。2。1。9。9。6 

1 る 8 FOR 『=1 TO 2:FOR 1I1=1 TO ヶ 

1Z9 LET DI,I1)=9:NEXT 1I1:NEXT I 

186 FOR !=1 TO 5:FOR 1I1=1 TO 6 

129 LET BI,I1)=9』NEXT 1I1:NEXT I 
289 LET D〈1, る )=3:LET D(2。 る )=4:LET DC1 ,1)= ま 1E2:LET DC(2,1)= ニ 262 

216 LET BC1 ,1 )= 和 ま 1Z2:LET BC2。1)= 多 1D9:LET B(3,1)= あ 232』LET BC4,1)= も 2 の 9:LET B(5,1) 

= も 2F2 

229 LET B2=5:LET S=@:CLEAR 

236 POKE も 3B, も 32 , ま の 9 , も 35 , も 2F も 91 , も 40 : CALL を F992 

246 LET TIME=@ 
256 IF TIME<2 THEN GOTO 256 

249 LET CURSOR=1 の ,15:PRINT CHR を (を FA , ま FB 。 も 82 , ま FB , も 85 , も BF , も 25 , も 82) : 

27Z6 LET CURSOR=29 , 1 る:PRINT CHR を (14, まる 9 。 も FE) 』TAB( 34)』" "iTABC る る 6)" "TAB( の 8) 


3299=20 
3298=86 29 29 29 85 29 29 8E 
32A9=209 29 8F 85 8E 8F 85 8E 
32A8=84 91 83 84 85 20 29 29 
32B9=29 29 29 29 85 8F FD 29 
32B8=86 8F F9 F9 85 8F 29 29 
32C9=8F 29 86 29 89 8A 85 88 
32C8=86 29 86 8A 85 29 29 29 
32D9=29 29 29 29 85 8D FD D5 
32D8=81 8D 29 29 85 8D D6 85 
32E9=8D 2 81 85 82 86 29 86 
32E8=86 2 86 81 85 29 29 209 
32F9=29 29 2 29 29 29 2 29 
32F8=29 29 29 29 2 29 20 29 
3399=29 29 29 29 29 2 2 29 
3398=29 29 29 2 29 2 29 29 
3319=29 29 29 29 29 29 29 29 
3318=29 29 29 84 85 85 8E 260 
3329=29 84 8E 8F 83 29 29 29 
3328=29 2 29 2 29 2 29 29 
3339=20 29 29 29 29 2 29 26 
3338=29 29 29 86 29 29 86 29 
3349=29 86 8C 8D 86 29 2 29 
3348=29 29 29 29 29 29 2 29 
3359=29 29 29 29 29 29 29 29 
3358=29 29 2 86 29 29 86 29 
3369=29 86 29 2 86 29 2 29 
3368=29 29 29 29 2 29 2 29 
3379=29 29 29 29 2 29 29 29 
3378=29 29 29 81 85 85 8D 209 
3389=29 86 29 26 86 29 9D 29 
3388=29 29 29 29 2 20 29 29 
3399=29 29 2 2 2 2 29 29 
3398=29 29 F7 F7 F7 F7 F7 F7 
33A9=F7 F7 F7 F7 F7 F7 F7 29 
33A8=29 29 29 29 2 29 29 29 
33B9=29 2 20 29 29 2 2 29 
33B8=29 29 29 2 29 29 29 29 
33C9=29 29 29 29 2 2 2 29 
33C8=29 29 2 29 2 29 29 26 
33D9=29 29 29 2 2 29 2 2 
33D8=29 29 29 2 29 29 29 26 
33E9=29 29 2 29 29 29 2 209 
33E8=29 29 29 2 29 29 20 20 
33F9=29 29 29 29 29 20 29 20 
33F8=29 2 29 29 29 29 29 29 
3499=29 29 29 29 29 29 2 29 
3498=29 29 F4 29 29 20 2 29 
3419=29 29 20 29 29 29 2 20 
3418=29 29 2 29 2 29 209 29 
3429=29 29 29 29 2 29 26 29 
3428=29 89 F5 29 2 29 29 29 
3439=29 29 29 29 2 2 2 29 
3438=29 29 29 2 2 29 29 290 
3449=29 29 29 29 29 2 84 85 
3448=8A 3D 88 85 83 29 29 29 
3459=29 29 29 29 2 29 29 29 
3458=20 29 29 20 2 2 29 29 
3469=29 29 2 209 2 29 86 69 
3468=9D FB 9D 69 86 29 29 209 
3479=29 29 29 29 2 2 29 29 
3478=29 29 29 20 2 29 209 269 
3489=29 2 29 29 2 2 F2 FF 
3488=F5 ED F2 FF 2 29 29 29 
3499=29 29 29 2 29 29 2 20 
3498=29 29 29 29 29 2 29 20 
34A9=29 29 2 2 29 29 8A 69 
34A8=S5B 9E 5D 69 88 2 2 29 
34B9=29 29 29 29 29 29 20 29 
34B8=29 29 29 29 2 29 2 20 
34C9=29 20 2 29 29 2 F4 14 
34C8=69 F7 6 14 29 2 29 26 
34D9=29 29 29 2 2 29 2 29 
34D8=29 29 2 2 2 2 29 20 
34E9=29 29 20 2 2 29 F4 260 
34E8=97 29 97 2 2 29 29 20 
34F9=29 29 29 29 29 2 2 29 
34F8=20 29 29 20 2 29 2 29 
3599=29 29 29 2 29 29 29 26 
3598=69 29 6 2 29 29 2 2 
3519=29 29 29 29 2 2 29 29 
3518=29 29 2 2 2 2 29 28 
3529=20 29 29 29 29 29 29 84 
3528=FE 89 FE 83 29 29 29 29 
3539=84 55 4E 49 54 85 85 85 


9 9 

289 PRINT TAB〈36) j" ":LET 3 を =" テト ロイ アト ~ クリ ラテ トキ 系 ブ カ フ " 

226 LET CURSOR=9 , 15:FOR !=1 TO 18:PRINT MID ま (NM3 ま , 1 。1)j:EMUSIC P8P:NEXT I:PRINT 
TAB( 1 59) 』" START 〔S1" 

366 IF FNK<>$53 THEN GOTO 399 

319 LET TINME=9 :POKE ま 3B,$35, も 3 , も 38 , ま 2F , ま 61 , ま 9 :CALL 多 F89 の 

329 IF TIME<16 THEN GOTO 326 

330 POKE を 3B, ま 38 , ま 30 , も 3B , 2F , も 91 , も 96 :CALL も FG6 の 

346 FOR !=1 TO Z:LET Pl1=1+INTCRND(B) ) *2:LET P2=2+INTCRNDK 1 1 ) ) 


356 LET J= ま ?Z:IF I>4 THEN LET J= を D 

3 る 9 POKE FNP ,J,J。J:POKE FNP+ も を 26, 。。 け 。 け 。JiPOKE FNP+ ま 46 」J。 サ 。 サ 。。JIPOKE FNP+ も る 2 。 
2 

3Z9 NEXT 』 

386 FOR 1=1 TO 2:LET D〈I,2)=PEEKCD て 1 ,1)) :POKE DCI,1), ま 44 

329 IF DI ,2)=*?Z THEN LET D〈I,5)=1 

499 NEXT 』 

419 FOR 1I=1 TO SiLET BI ,2)=PEEK〈B<〈1 ,1)) :POKE BCI,1), ま 42 

429 IF BI ,2)=?Z THEN LET BC〈I,5)=1 

436 NEXT 』 

446 MUSIC P3T2 シ U レ ミ 帳 ソ B ソ ミ D シ DP 1 =P3B フ T4 ミ ミ :LET TIME=B 

459 REM MAIN 

4 る 6 FOR J=1 TO 6:GOSUB 229@ 

4Z9 ON J GOSUB 599 , 1 1 9 ,1596 , の 89 ,1599,11 る 8 

486 GOSUB 255@ 

429 MUSIC M:NEXT JiGOTO 4<9 

59@ RENM DM MOVE 

516 IF (DC1 ,3)=1)*xCD(2,3)=1) THEN RETURN 

526 LET CURSOR=12,23:PRINT "DM-NMOVE " 

539 LET NM=1:IF CD(1。3)=1)+〈DC1 ,。Z)=1) THEN GOTO 8<6 

546 LET CURSOR=22,1?:PRINT "D"' ij" MOUE" 

556 LET M1=5 

5 る @ LET NM る =FNK:IF (も 36<M る ) * て M る < も 3Z) THEN GOTQ 58@ 

5Z9 GOTO <59 

589 LET 2=M る - ま も 39 :LET Z=M2 

529 IF M2=D〈M, る ) THEN GOTO <59 

る 8 LET MZ=ABS(D(H。 る ) -Z〉 

る 1 IF M1-MZ<9 THEN GOTO <59 

226 LET DXH, く )=N2:LET 1=M1 -Z MUSIC T1P9U ラ 

る 3@ LET CURSOR=25 ,*2-1 :PRINT M1 iTAB 28) を て M2) 

る 48 IF M1<=@ THEN GOTQ 8c8 

256 LET M3=9:IF て FNK= ま 51)*CD〈M,6)=1) THEN LET M3=ー も 22 

る る 9 IF (て FNK= ま 5Z) *CD(M,) う =2) THEN LET MM3=ー ぁ 49 

6Z9 IF (FNK= ま 45) *CD(M, る )=3) THEN LET 3=ー ま 1E 

3 る 86 IF (FNK= も 41)*CDC(M, る )= る 6) THEN LET M3= ま 1E 

る 29 IF (FNK= も 53) *CD(M, る )=5) THEN LET NM3= を 46 

Z89 IF (FNK= ま も 44)*CDCM, る 6)= ニ 4) THEN LET M3= ま 22 

Z19 IF FNK= ま 5Q THEN MUSIC T1P8D<:GOTO 8G6 

Z2@ IF M3=@ THEN GQTQ 5<g 

Z36 IF PEEKXM3+D<M, 1 ) )= も る 9 THEN GOTO 56@ 

Z46 IF て PEEK(M3+D(M,1)) く > も 20) *〈M1 2<9) THEN GQTQ 5<@ 

Z59 POKE DX〈H,1) ,D(M,。2) :LET D(M,2)=PEEKCD(M,1)+M3) :MUSIC T1P9U ト シ 

Z6@ LET 1=M1 -1:IF D〈M,2) く <> 多 28 THEN LET 1=N1-1 

ZZ IF D〈M,2)= ま ?Z THEN LET D(M,5)=1 

Z8@ LET CURSOR=25 ,*2-1:PRINT NM1i 

Z ァ 9 LET DXM,1)=M3+DCH。1) :POKE D(H。1) , ま 44 

866 IF DX<M,2) う = も 44 THEN LET D<M,2)=DC1。2) :LET D<M,2)=D(2。2) 

819 IF D<M,2)<> も 32 THEN GOTO 859 

829 FOR !=1 TO 5 

836 IF D〈M,1)=BT,1) THEN LET Dc(H,2)=BX 1 。2) :LET 1』=5 

849 NEXT 』 

85@ IF M1>8 THEN GOTQ 5<@ 

829 LET D<,5)=6 :IF D〈H,2)= ま ?Z THEN LET D〈M,5)=1 

BZ9 IF (NM=1)*CD(2,3)=6)*CD〈2。Z)=9) THEN LET =2:GOTQ 548 

886 LET CURSOR=25 , 1 :PRINT 5:TAB〈< る 4) 』5 

8?9 RETURN 

の 299 REM BH MOVE 

19 LET CURSOR=12,23:PRINT "BH-HOVE ": 

2 FOR I2=1 TO 5・ 

3 IF (BCI2,3)=1)+CRND(2) >1)+(BCT2。6)=1) THEN GOTO 1159 

249 LET いい =4:LET MM1=INTCRND2))+1:IF DCUM1 。Z)=1 THEN GOTO ?249 

259 IF DCM1 ,1)=B〈I2。1) THEN GOTQ 1146 

29 LET T5=D(M1 ,1) :LET X=FNT1:LET Y=FNT 

?Z9 LET T5=B〈I2,1):LET X1=FNT1 :LET Y1= ニ FNT 

288 IF (X-X1>8) <Y-Y1 >=9) THEN LET MM2= 多 22 

の 6 IF 〈X-X1 く <=9)*CY-Y1>9) THEN LET 2= ま 1E 

1099 IF 〈X-X1>=9)*(Y-Y1<9) THEN LET 2 ニー を 1E 

1919 IF (X-X1<@)*CY-Y1<=8) THEN LET 2=ー ま 22 


1926 IF PEEK〈UM2+B<1】 2。1) )= 多 る 9 THEN GOTO 1149 3538=85 85 85 89 44 41 54 41 続 次 リ 
1836 IF て PEEK(U2+B(12。1)) く > 多 28) *(M-2<8) THEN GQTO 114@ 3549=89 85 85 85 85 89 85 85 く ペ ス 
1949 POKE BCI2,1),B(I2,2):LET B(I2,1)=B(I2。1)+MU2:MUSIC 1P9DP g 

1959 LET BI12,2)=PEEKB(』12,1)):POKE BI2,1) 32 2548=85 85 89 85 85 85 85 83 林 
1669 LET =-M1:IF BCI2,2) く > を 20 THEN LET = い -1 3559=86 44 5B 31 2D 32 5D 29 ジ 
1829 IF BCI2,2)<> 多 44 THEN GOTQ 1929 3558=26 所 


ゲー ミソ 


ん バチ ンコ UFO 心 カシ オ (会 03-347-4830) MSX( 8 K) つ ROM カ ー ト リ ッ ジ \4.,800 殺 バ チン コ で 人 気 の あ る 、 ゼ ロフ ァ ざ どう 
 、 ヽ ン ェ ッ 


イツ ー や オー ル セ プ ブン な どの ほか が 、UFO シ ョ ヨッ トゲ ー ム も 楽し め る 。 
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シミ ュ レ ーション DM GAME の 続き 


す タ 


1 89 
1 9?9 
1199 
1119 
1129 
1139 
1149 
1159 
1149 
1179 
1189 
1129 
1 2 
1219 
1 226 
1 239 
1 249 
1 259 
1 269 
1 2Z9 
1 289 
1 229 
1 399 
1319 
1 329 
1 339 
1 349 
1 359 
139 
13Z9 
1 389 
1 329 
1 499 
1419 
1429 
1 436 


1449 
1 459 
1469 
1476 
1 489 


LET B(12。2)=D(1。2) :IF BI2。1)=D〈2,1) THEN LET B(1I2,2)=D〈2。2) 

』F BI2,2) く <> 多 42 THEN GOTO 1139 

FOR !=】 TO 5z:IF 1=I2 THEN LET 】=』+1 

IF BI,1)=B(】2,1) THEN LET B(1I2。2)=B( 1 。2):LET 】=5 

NEXT 1 

IF り >@ THEN GOTO 2Z6@ 

LET B(】2。5)=9:IF B(1I2,2)=$?Z THEN LET BI2,5)=} 

NEXT !I2:RETURN 

REN BH FIGHT 

LET CURSOR=1 2 ,23:PRINT “"BH-FIGHT"j 

FOR E5=1 TO 5:IF (BCE5,4)=1)+〈B(E5, る )=1)+(INTCRND(3) )=1 ) THEN GOTO 14S56 
LET E=INTCRND(2)+1):】F D(E,Z)=1 THEN GOTQ 1128 

LET T5=D(E, 1 ) :LET X1=FNT1 :LET Y1=FNT 

LET TS5=B(E5,1) :LET メ =FNT1:LET Y=FNT 

IF DE,1)=B(E5,1) THEN GOTO 1336 

LET X3= メ ーX1 : IF メ = ニ X1 THEN LET X3=.91 

LET Q=ATNC〈Y-Y1) ノ /X3) :IF ABS(Qx189/PAI)>45 THEN GOTO 1229 

FOR Z=X TO X1 STEP SGNX1 -X) 

LET R1=PEEK(FNQ) : POKE FNG,6F :POKE FNG,R1 

MUSIC T1P8 く <:IF (CR1= 多 ?Z)+〈R1= 多 2D) )*CD(E,5)=9)\(B(E5,5)=9) THEN GOQTO 14S6@ 
NEXT ZiGOTO 1339 

LET =ATN(〈(XーX1) ノ (Y-Y1) ) :FOR Z=Y TO Y1 STEP SGNKY1 -Y) 

LET R1=PEEK(FNQ1 ) : POKE FNQ1 , ま も 6F :POKE FNQ1 ,R1 

MUSIC T1P6<:IF (CR1= 多 ?Z)+〈R+= 多 の 2D〉))xCD(E,5)=6)*〈B(E5,5)=9) THEN GOTO 14S56 
NEXT Z 

LET いり =3:GOSUB 2569 

LET R1=T(E5,E)+1 

IF R1>6 る THEN GOTO 1439 

IF R(18+R1)<INT(RND(6)+1) THEN GOTO 146 る 6 

LET 0=?-R1+1zIF ロ <1 丁 HEN GOTO 14S568 

LET 0=0-5:GOSUB 2216 

IF 01= 多 4E THEN GOTO 146 る 9 

LET い =4:GOSUB 2569 

IF 01= 多 4D THEN LET D〈E,3)=】 :LET CURSOR=24,2xE:PRINT "Mj 

IF 01= 多 4 る 6 THEN GOSUB 1489 

IF 01= 多 44 THEN LET D(E,Z)=1 :LET CURSOR=26,2*E:PRINT "D" jiPOKE D(E,1)。D(E。 る 


IF (D(1 。Z)=1)\(D(2。Z)=1) THEN GOTO 2Z36 

NEXT ES5:RETURN 

LET いり =5:GOSUB 25349 

GOTO0 14S59 

IF D(E,?)=9 THEN LET D〈E, ヶ )=1:LET CURSOR=39 ,2*E-1:PRINT "の "3 TB(C 2Z) j CHR も く 


る る 6) : RETURN 


1 4?6 
1596 
15169 
1529 
1539 
1546 
15S569 
1569 
1526 
1589 
15?9 
1 699 
1 る 16 
1 629 
1 639 
1 る 49 
1 659 
1 669 
1 る 2Z9 
1 689 
1 426 
1Z99 
1Z18 
1Z209 
1 Z39 
1 Z49 
1 Z59 
1 2 る 9 
1ZZ8 
1 Z89 
1 Z め 6 
1899 
1819 
1829 
1839 
1849 
1859 
1849 
18Z9 
1889 
18?9 
1 ?86 
1 め 19 
1?29 
1 ?3@ 
1?49 
1?56 
1 る 9 
1?Z9 
1 ?8@ 
1 ??8 
2999 
2916 
2929 
29 39 
284@ 
2959 
2 る 9 
29Z6 
2989 
29 め 9 


LET DCE,4)=1:LET CURSOR=25 , 2xE:PRINT CHR を も (を 4 る ) : RETURN 
REM DM FIGHT 

LET CURSOR=12。23:PRINT "DH-FIGHT" 

IF CD〈1,4)=1)*CDC2。4)=1) THEN RETURN 

LET E=1:IF (DC1,4)=1)+〈D(1 。Z)=1) THEN GOTO 2139 

LET CURSOR=21 。18:PRINT "DM" jiEi" FIGHT" ji 

LET CURSOR=21 ,12:PRINT "コウ ァ ヾ キモ フク ヒョク" 』TAB( 35) 

LET E5=FNK:IF FNK= も 5 THEN MUSIC T1P2Z<:GOTO 2139 

LET E5=E5-$39 :IF CE5>9)*CE5<5+1) THEN GOTO 1529 

GOTO 15<9 

IF BCE5, る )=1 THEN GOTO 1569 

MUSIC P:PRINT E5j:LET CURSDR=21 ,21 :PRINT "コウ クー キネ フキ" TAB( 35) j 
IF CFNK= 多 31 )xCDCE,8)=9) THEN LET E3=1:LET C2=59:GOTO 1649 
IF CFNK= 多 32) CDCE,?)=9) THEN LET E3=2:LET C2=39:GOTO 1649 
GOTO 16<196 

MUSIC PiPRINT E3j:LET T5=D(E,1):LET ※=FNT1:LET Y=FNT 
LET T5=B(E5 1) :LET X1=FNT1 :LET Y1=FNT:IF DE,1)=B(E5,1) THEN GOTO 1y89 
LET X3=XーX1:IF X=X1 THEN LET X3=.91 

LET Q=ATNC て Y-Y1) ノ /X3) :LET C=ABS(Qx189 ノ PAI ) 

LET C1=2Z:IF (DCE。6)=2)+〈D(E, る )=5) THEN LET C1=9 

ODN DE,6) GOTO 17Z969,1726 ,17Z49 ,1789 , 1899 ,1839 

IF X-X1<9 THEN GOTO 1869 

GOTO0 12Z59 

IF Y-Y1<= THEN GQTQ 1869 

GOTO 1819 

IF X-X1>8 THEN GQTQ 1869 

IF Y-Y1<@ THEN LET C=-C 

GOTO 1859 

GOTO 1869 

IF X-X1>9 THEN GOTO 1869 

GOTQ 1849 

IF Y-Y1>=9 THEN GOTO 18< る 9 

GOTO 1859 

GOTQ 18<@ 

IF X-X1<9 THEN GOTO 186@ 

IF Y-Y1>6 THEN LET C=-C 

IF 〈C1-C2<C) CC<C1+C2) 丁 HEN GOTO 18Z@ 

GQTQ 12< る 9@ 

IF C>45 THEN GOTQ 1929 

FOR Z=X TO X1 STEP SGNXX1-X) 

LET R1=PEEKCFNQ) : POKE FNGQ, ま る F :POKE FNG。,R1 

MUSIC T1P8 く <:IF CCR1=?Z)+ て R1= ニ も?D))*CD(E。5)= ニ 9)*〈BCE5,5)=@) THEN GQTO 1?<9 
NEXT 2Z:GOTO 1?89 

LET 0=ATNCCX-X15 ノ て Y-Y1)) :FOR Z=Y TO Y1 STEP SGN(Y1-Y) 
LET R1=PEEK〈FNQ1 ) :POKE FNQ1 , も る F :POKE FNQ1 ,R1 

MUSIC TI1P6 く <:IF (CR1= あ ?Z)+(CR1= ニ 多め D))*CDCE。5)=9)x〈BCE5,5)=9) THEN GOTQ 1 くる 9 
NEXT 2Z:GOTQ 1289 

LET いり =2:GOSUB 25<9 

GOTO 2139 

LET いり =1:GOSUB 25<@ 

LET R2=T〈(E5,E)+1 

IF (E=1)*CR2>=6) THEN GOTO 212@ 

IF (CE=2)*CR2>8)*CR2<19) THEN LET R2=8 

IF (て E=2)*C〈R2>18) THEN LET R2= ゥ 

IF RC2*CE3-1)+R2〉 く INTCRND( 6)+1) THEN GOTQ 2126 

IF E3=1 THEN LET =8-R2 

IF E3=2 THEN LET 0=13-R2 

IF 0<1 THEN GOTO 219%9 

LET 0=0-5:GOSUB 2219 

IF 01=*4E THEN GQTO 219?9 

LET り =4:GOSUB 256@ 


2199 IF 01= 多 4D THEN LET B(E5,3)=1:LET CURSOR=24 ,5+ES:iPRINT "Pi 
2119 IF 01= ま 46 THEN LET B(E5,4)=1:LET CURSOR=25 ,S+ES:PRINT 2 
2128 IF 01= 多 443 THEN LET B(E5, る )=1:LET CURSOR=26,S+ES:PRINT "D" ij:GOSUB 21 く る 9 
2139 GOSUB 25569 

2149 IF (CE=1)xCD〈2。9)=9)*X〈D〈(2,Z)=9) THEN LET E=2:GQOTO 1S49 

2159 RETURN 

21 る 9 POKE BE5,1) ,B(E5,2) iLET B(E5,1)=6@ 

217Z9 し LET B2=B2-1 :LET S=S+1:IF B2=9 THEN GOTO 2646 

2189 RETURN 

21?9 LET い =5:GOSUB 25696 

2299 GOTQ 2139 


画面 デー タ 続 き 


3569=86 
3568=BA B3 86 BA B3 B9 DE 86 
3579=86 29 C9 DE B8 DE D7 D1 
3578=29 29 29 86 2 20 2 29 
3589=86 29 D8 AE B8 86 2 29 
3588=B1 C2 86 BZ7 D8 AE B8 86 
3599=86 42 5B 31 2D 35 5D 29 
3598=29 29 29 8A 85 85 85 85 
35A9=89 85 85 85 85 89 85 85 
35A8=85 85 89 85 85 85 85 88 
35B9=86 2 CC DE DB AF B8 CD 
35B8=AF C4 DE 86 44 4D 29 31 
35C9=86 29 29 35 29 86 29 29 
35C8=35 29 86 2 31 32 2 86 
35D9=8A 48 45 58 85 85 85 85 
35D8=85 85 85 88 44 4D 29 32 
35E9=86 29 2 35 2 86 2 29 
35E8=35 29 86 29 31 32 20 86 
35F9=86 FC F7 9D 2 D3 D8 29 
35F8=29 29 2 86 42 48 29 29 
3699=86 2 29 34 2 86 29 29 
3698=35 29 86 29 29 39 29 86 
3619=86 FD 9D 9D 29 29 29 290 
3618=29 29 29 86 2 31 2D 35 
3629=86 29 2 29 2 86 20 29 
3628=29 2 86 2 29 20 2 86 
3639=86 97 97 FD 29 BS B6 269 
3638=29 29 29 8A 44 41 4D 41 
3649=47 45 AS 4D 45 53 53 41 
3648=47 45 8B 85 85 85 85 88 
3659=86 97 97 FC 29 2 2 29 
3658=29 2 29 86 A5 44 2D BB 
3669=DE DD B6 DE B2 2 CB AE 
3668=B3 BC DE 2 2 29 2 86 
3679=86 FC F7 FD 2 CD B2 C1 
3678=29 2 29 86 AS 46 2D BE 
3689=DD C4 B3 CC C9 B3 2 CB 
3688=AE B3 BC DE 29 29 20 86 
3699=86 FD 29 FC 2 2 2 29 
3698=29 29 2 86 A5 4D 2D B2 
36A9=C4 DE B3 CC C9 B3 29 CB 
36A8=AE B3 BC DE 29 2 20 86 
36B9=86 29 F7 29 2 29 29 20 
36B8=29 29 2 8A BA B3 B9 DE 
36C9=B7 A5 B2 C4 DE B3 2 C6 
36C8=29 C2 B2 C3 85 85 85 88 
36D9=86 2 29 29 29 2 20 20 
36D8=29 29 29 86 6F B2 C4 DE 
36E9=B3 3A B2 C4 DE B3 BD D9 
36E8=E9 CA A4 B2 C4 DE B3 86 
36F9=8A 4D 41 59 85 85 85 85 
36F8=85 85 85 88 BD D9 CE B3 
3799=BA B3 C6 D1 BZ7 A6 B6 B4 
3798=C3 A4 BF C9 CE B3 BA 86 
3719=86 2 D6 BA 3A 39 48 45 
3718=58 209 2 86 B3 C6 B2 C4 
3729=DE B3 BD D9 Al 2 29 29 
3728=29 29 2 20 2 2 20 86 
3739=86 29 C9 C3 3A 38 48 45 
3738=58 29 2 86 4B 45 59 29 
3749=4E 57 2 4E 29 4E 45 29 
3748=53 45 29 53 29 53 57 86 
3759=86 69 69 69 6 69 69 69 
3758=69 69 6 86 D1 BZ 81 7C 
3769=29 31 29 32 2 29 33 29 
3768=29 34 2 35 29 20 36 86 
3779=86 69 FC F7 FD 29 FC FZ 
3778=FD 29 FC 86 B2 C4 DE B3 
3789=29 51 2 57 2 2 45 29 
3788=29 44 29 53 2 2 41 86 
3799=86 69 FD 29 FC F7 9D 9D 
3798=9D F7 FD 86 6F BA B3 B9 
37A9=DE B7 3A 31 2E BA B3 B9 
37A8=DE BZ7 BD D9 BI B2 C3 86 
37B9=86 69 FC F7 FD 29 9D 9D 
37B8=9D 9D 9D 86 A6 C6 AD B3 
37C9=D8 AE B8 29 4B 45 59 5B 
37C8=31 2D 35 5D A4 32 2E 86 
37D9=86 6 FD 97 97 F7 9D 93D 
37D8=9D 9E 9D 86 BA B3 B9 DE 
37E9=B7 CC DE BZ7 A6 C6 AD B3 
37E8=D8 AE B8 29 4B 45 59 86 
37F9=86 69 FC 97 97 29 FC 9D 
37F8=9D 9D 9D 86 5B 31 2D 32 
3899=5D A4 B1 C4 CA B5 C9 C9 
3898=BC D9 2 21 21 2 29 86 
3819=81 85 85 85 85 85 85 85 
3818=85 85 85 85 85 85 85 85 
3829=85 85 85 85 45 78 79 6C 
3828=61 6E 61 74 69 6F 6E 82 
3839=69 69 69 69 69 69 69 69 
3838=69 


シミ ュ レ ーション DM GAME の 続き 


IF 0<@ THEN GOTO 2256 
IF 0>3 THEN LET 0=3 
LET 02=INT(RND( る )+1 ) 


LET 01=ASC(MID ま (ID まく ロー ロ 。 る 6) 。02 。1) ) : RETURN 


IF 0<-4 THEN LET ロ =ー4 


LET 02=INTCRND( る 6)+1)+INTCRND( る )+1 ) 一 】 
IF 02>5 THEN LET 01= ま 4E:RETURN 
LET 01=ASC(MHID ま MID も (も 2ー0,5) 。 2 。1) ) : RETURN 


FOR 』=12 TO 16:LET CURSOR=24 。 1 :PRINT " 


"gsiNEXT 


FOR 】=1 TO 2:IF D(1 ,Z)=1 THEN LET =I+1 
LET TS5=D(』,1):LET 丁 1=FNT1/2:LET T2=INT(FNT プ 2) 
FOR 』1=1 TO 5:IF B〈1】1. る )=1 THEN LET CURSOR=29+Tx4。11+】1:PRINT ""j』:GOTO 232 


LET T5=B(1』 1 1):LET 丁 3= テ FNT1 ノ 2:LET 本 4=INT(FNT ノ 2) 
LET T( 11 。】)=SQR((( 征 3-】 ) *2)^ へ 24((T4-T2) *2)^2) ノ 2+D(】。5)+B( 1 1。5) 
IF T(I1,】)-INT(T( エ 1 1))>.Z THEN LET TI1, エ 1)=T(I1。1)+1 


LET TI1,!)=INT(T(I1。1』)) 


IF (DI,5)=B(I1 5))wCD(】 ,5)=1) THEN LET TI1 。】)=T(1I1。】)-2 
LET CURSOR=29+Ix42。11+I1:PRINT 本 (Ii1。1)i 


NEXT 1】1 


IF D〈(2。Z)=1 THEN GOTO 2426 


NEXT 1』 


FOR 1!= る TO 19:LET CURSOR=2Z 。!:PRINT " 


"siNEXT Ii 


FOUR !=1 TO 5:LET CURSOR=28 , 5+ 』 
IF BC(』, る 6)=1 THEN PRINT " "ji:GOTO 246 る 8 
LET TS=B〈T 。1):PRINT INT(FNT1/2) j INTCFNT ノ 2) 


NEXT 』 


FOR 】=1 TO 2:LET 5=D〈T 。1):LET CURSOR=28 , 2*I:PRINT FNT1/2j』 INT(FNT ノ 2) 』 
IF D(』 エ 。2)=1 THEN LET CURSOR=28 , 2xI iPRINT “""』 


NEXT 』 


FOR =】 TO Si:』F BT, る)=9 THEN POKE BI 。1) , を 42 


NEXT 』 


FOR =1 TO 2:IF D(】。Z)=8 THEN POKE DI 。1) , を 44 


NEXT 』 
RETURN 


FOR 』=18 TO 22:LET CURSOR=21 ,I :PRINT “ 


GOSUB 2559 
FOR J5=1 TO 1 


LET K=9:FOR 』=9 TO 3:LET CURSOR=21 ,18+】:FOR 1I1=9 TO 
IF K=LEN〈 ト NH1 も ま ( り ))+1 THEN GOTO 2639 

IF 人 ASC(MID も (1 て りう) ,K。1)) く > まあ 28 THEN MUSIC 本 1P8< 

PRINT MID ま (1 ま ( り ) 。K。1) 


LET K=K+ 1 :NEXT 1:NEXT 』 


NEXT JS5iRETURN 
REM NEUI BH 


FOR =1 TO 5iFOR 】1=1 TO る :LET BKX1,】1)=9 :NEXT Ii1iNEXT 【 
FOR 1!=1 TO Si:LET G=2+INT(RND〈 の ) ) *2 

LET G2=3:』F G=INT(GZ4)*3 THEN LET G2=4 

LET G1=G2+2XINTCRND〈Z) ) :LET G3= も 199+G+G1* 和 も 20:LET G4=PEEK(G3) 
IF (G4= あ 44)+(G4= ニ まあ 42) THEN GOTO 2<89 
IF G4= も ?Z THEN LET BI ,5)=1 

LET B(】 。1)=6G3:LET BI 。2)=64:POKE G3, ま 32 :NEXT 1】:GOSUB 2229 


FOR 1=6 TO 19:LET CURSOR=24 。 』 :PRINT " 


LET TIME=9 : RE GAME END 


IF TIME<3 THEN GOTO 2Z49 


MUSIC T4P6Q4B ラ ラ シ レ P5 析 フ 欄 フ ソソ ロ 9T 1 


GOSUB 2559 

IF S<=8 THEN LET い =Z 
IF S>8 THEN LET い = ム 
LET TINME=9 : GOSUB 25Z8 


IF TIME<5 THEN GOT0 2899 


GOSUB 255@g 
IF S>S】 THEN LET S1=S 


LET CURSUR=22 , 1】:PRINT "タオ シク テキ "i 


LET CURSOR=23 ,29 :PRINT "SC-" jjS』:LET CURSOR=23 ,21 :PRINT "HI1-" 
IF TIME〈Z THEN GOQTO 2858 


GOTO 1648 

に 4 コロ E エ ネエ テ ミ ネ ネネ テテ テテ 2: 
REM ※ シ ミュ レー ショ ン DM テ 
REM * BY.RURERU テ 
に 1 コン ええ ミネ ネエ ミネ ミネ テ ミズ テ 】 


2/30-286600 ゲー ハエ ンド 負 理 

3290 て お 352F タイ トル 画面 
と 

お 3530 て お 382F 説明 画面 デー 
タ 

3830 て お 3B2F ゲー ム 画 面 デ 
デー ダ 

田 チ ェ エッ クボ イン ト 

わ お ! バ ベー シッ クマ スタ ーJr 

の シミ ユ レ ーション ゲー ム だ 。 

な か な ガ 良 て で き て いる ぞ | 

マシ ン 語 部 の リス ト を 見 て 「 う 

ーー む 」、 と 思 つ だ 人 も いる だ ろう 

けれ ど 、 な ん の こと は な い 、 全 


部 画面 の アデ アー ツタ な の だ 。 間 違 つ 


て も 胡 走 は な いけ れ ど 、 画 面 表 
示 が お か し ぐ な つて し まう か ら 
一 訪 注 意 し て 入力 し よう 。 そ れ 
より も BASIC 部 リス ト 中 の "P 


OKE' や CALL" の 値 を 間違わ 


な いよ うに 。 ど ご どこ か に 飛ん で 行 
つて し まう から ね 。 ち な み に ぶ お 


F009 番 地 は モニ ター の デー マタ 
プロ ッ ン 転送 け プ ルー チン な の 
だ 。 つ まり 画面 デー ツタ を テキ ス 
トモ ー ド エリ ア に プロ ツノ 転送 
し て 画面 表示 を し て いる わけ だ 。 
他 の 機種 で も この 辺 の こと が わ 
ガ る 人 な ら 移 植 し て みて も いい 
だ ろう 。 廊 ウム ム ム …… バッ チ 
リ 賞 。 


"ENEXT 】 RETURN 


"siNEXT IiLET B2=5:iGOTO 3459 


5S1:LET TINME=8 


※ 注 入力 は で きる だ け 
省略 形 を 使用 し て くだ さき 
い 。SAVE は まず $3290 
ー$ 3B2F の 画面 データ 
を モニ ター コマ ンド で S 
AVE し て 、 次 に BASIC を 
SAVE し て (だ さい 。 
LOAD は 、 画面 デ ゲー タ 、 
BASIC の 順に 。 
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ロ ズ ビ ロ い ば ワ 
hA 
ばば か tfRT 
の 
 ( 朋 
お の 呈 
へ つれ うれ かさ 


用 (用 (H 


Q ゅ 
いや 


部 


Ace 
4 
4 
を 


ーーーー……、 


< 
好 
絆 
英 
を 
づ 
機 
も | 
や 
つ 
つ 
げ 
だ 
る 


0 ue Gr キ 
の 
9 


画面 デー タ 続 き 


3849=60 
3848=64 
3859=69 
3858=60 
3869=69 
3868=31 
3879=69 
3878=20 
3889=20 
3888=29 
3899=69 
3898=F7 
38A9=F7 
38A8=32 
38B9=60 
38B8=20 
38C9=20 
38C8=20 
38D9=60 
38D8=F7 
38E9=F7 
38E8=20 
38F9=69 
38F8=20 
3999=20 
3998=20 
3919=69 
3918=F7 
3920=F7 
3928=20 
3939=69 
3938=20 
3949=20 
3948=20 
3959=60 
3958=F7 
39609=F7 
3968=20 
3979=66 
3978=29 
3989=20 
3988=29 
3999=69 
3998=F7 
39A9=F7 
39A8=74 
39B9=60 
39B8=20 
39C9=20 
39C8=29 
39D9=69 
39D8=F7 
39E0=F7 
39E8=29 
39F9=69 
39F8=20 
3A99=20 
3A08=20 
3A10=60 
3A18=F7 
3A29=F7 
JA28=29 
3A39=69 
3A38=20 
3A49=20 
3A48=20 
3AS59=60 
3A58=69 
3A69=60 
3A68=6F 
3A79=60 
3dA78=60 
3A89=69 
3A88=20 
3A99=44 
JA98=29 
JAA9=20 
3AA8=20 
3AB9=D1 
3AB8=20 
3AC9=31 
3AC8=20 
3AD9=20 
3AD8=20 
3AE9=32 
3AE8=20 
3AF9=20 
3AF8=20 
3B99=35 
3B98=20 
3B19=20 
3B18=6F 
3B29=20 
3B28=85 


ガー と ンズ ペー ツン 0 EEEH33SSsss 


ー。 リ プレ イ は Retry ?" の と き に 、 
[YIENTER | と すれ ば OK。 
[2I8| キ ー で 上 下 に よ け な が ら 、[4[6] キ 敵 キ ャ ラ 1 パタン ご と に 3 機 ず つ 攻 
ー で 照準 を 敵 機 の 直前 に あわ せ 、 [2 撃 し て くれ る 。 こ れ を 5 パタ ン と も 、 
ー で 撃ち な と し て 〈 く れ 。 敵 機 と 自 機 の 切り ね けた ら 1 面 ク リア 。 次 か ら は 1 
ヽ さ 位置 が あっ て な いと あたら な い ぞ 。 > パタ ー ン ご と に 2 機 ず つ 増 えて 面 クリ 
遊び 方 自 機 が 4 機 や られ る と ゲー ム オ ー バ ア は どん と どん 難し くく な っ て いく ぞ 。 


いつ も な が ら 、PC-1500 の 機能 
フル に 活用 し た スペ ー ス ・ シ ュー ティ 
ング ・ ゲ ー ム 。 し か も 、 い ろ ん な キャ 
ラク タ ( 下 の 図 ) が 登場 する し 、 そ れ 
ぞ れ 攻撃 パパ ター ン が 違っ て いる ん だ か し aa 
ら め い っ ぱい 楽し め る ぞ 。 4 ム 左 の 数 字 は SCORE。 ド ッ ト は 左 か ら 自 機 数 、 パ タン ご と の 残り 敵 機 。 

左 に ある キャ ラク タ が キミ の 戦闘 機 。 
右 か ら 敵 機 が ミサ イル を 撃ち な が ら キ 
ミ の ほう に 向かっ て くる (な か に 1 つ 
攻撃 し て こない 敵 も いる ぞ ) キミ は 、 


。 叶 WWAJ 
湖 は ……」 ry ふと ry 
SE 
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we 
デン s 


で 
ピン 


た 
ぜ 
な 
ん 
1 
し 
。 
。 
ソ 
て 
+ 


。et94 て 癌 洗 抽 FSS 苦 S と ゃ び 
は 。 叶 AS ひと は ひる び て で は 互 五 区 
生 民 名 論 ニー 汰 ささ d 宮 有 


9 
ーー 
の 


計 


どき > 時 rr 「 へ は と 
。*t9t 


ee と で て 清き 語 は (人 半 NY 
う 


ざ 6 


1 : =3: = N= ニ 2 マニ 
ノ 24: し =12:G ロ =2:P= 
3:0N ERROR 
GOTO 3:CLS : 
GOSUB 59 

3 回 科せ RIO。 日 

: GOUSUB 1P: 
CURSUR Li: 
GPRINT 9: 2$= 
INKEY$ : [F Z$ く < 
>"FGOUSUB 6 
4:GOUSUB 11:[F > 

=QLET = り g: 
GCURSOR 22 フ : 
GPRINT 2^Q- 1 
NEXT T:EF=E+1: 
GOSUB 9: ロロ =Q+2 
sGUTOU 2 

328 暫 罰 TU 3 

2 1F /2$="/"50SUB 
11*GOUSUB 39 
ノビ ラ ( (の まる "も" う =《Z 
まり 2 ボク グ ミ 

CURSOR L: 
GPRINT gk:L=L+F 
: IF L く <20R L>24 
LET 1 し ミ し ー ド 

8:F ニ (/ 和 まず ="2" )-(Z$ 
だ で お" うる N= ニ N キ 1F 
N く 10R N>3LET N 
=N-F 

: RETURN 

1 り :CURSOR 5 
GPRINT @$(N)s 
RE TURN 

11:0N TGOSUB 12, 1 
5 2 フク 29 6 
LURSGR YY3 
GPRINT @$(T*※3+ 
5): RETURN 

12:CURSOUR YiPRINT 
し 1 展 NRH 当 誤 4 
GOUSUB 4 

133 上 上 Y\ ョ 24 ル ET1 日 = 
RND 3 

1 5 ヤミ Yー15 1 上 Y ョ 6 
LET Y=24: 

CURSOUR 22PRINT 


1! 


CO ト O) 


15: RETURN 

16:CURSOR YiPRINT 
。  ・ IF _RND 6=2 
GOTO 4 

12:【F Y=24LET G= 
KNU 3 

18:[F Y<8LET Y=24 
:CURSUR 6: 
PRINE 

1d:Y=Y-2iRETURN 

29: G=RND 3 ヵ :CURSOR 
NSPRINIL "ekE 
Y く グフ LET Y=24: 
CURSUR 6IPRINT 

21:Y= ニ Yー12RETURN 

22:[F_RNDU 6=5 
GOUSUB 43 


2 間 2 
43: 


5: 


_FAITAS 


: BEEP 1, 255, 9# 0 


=RND 3:CURSOR 
YiPRINT " は Y= 
RND 6+12: 
RETURN 


:・【F_ KRND 4=3 


GOSUB 49:GOSUB 
43 


: 1 ヤッ メン ノン LE[ (ご 


RKNU 3:Y= グ ノン 


: BEEP 1 255, 16: 


LURSOUR YiPRINT 
すま 小 SNZLEM 
Y=2 ク 2 


:Y=Y+RND 4-3: 


LURSUR 24* 
PRKJNT ) の * 
KRKETURN 


:FUR 1=6TU L 


STEP 2』CURSOR 
1iGPRINT QNO 
BE 選 、 よ 上 1.8 
LURSOR 1-2: 
GPRINT 9iNEXT 
1。【[F L=YRND N= 
LE 1 ミニ ミ Y ぅ 5 ら ミ 5+1 
s+ 1 GOUSUB 6 
| 


: CURSUR LIPRINT 


「 "iRETURN 


記 則 引 抵 選 。 旧 よ 9 


CURSOR Y: 
GPRINT @$(T*3+ 
G):FOR J=Y-1TO 
6STEP -2: 
CURSOR J: 
GPRINT @(G)# 2$ 
=INKEY$ :GOSUB 
2: GOSUB 19: 
CURSOR J: 
GPRINT 9:NEXT 
J 


: CURSUR YiPRINT 


2 。 まま 江 選 [ 問 二 EE 1 
2 陸 負 に Aa か 
GOUSUB 69: 
GCURSOUR 25: 
GPRINT 2^P-1: 
[F P<9GOTO 199 
RE TURN 

CURSOUR Ys 
GPR1NT Q$(3* ネ †+ 
FOUR J=Y-1TD 
5STEP -1:BEEP 
1, 1:G=RNHU 332Z$ 
=1NKEY$ :GOUSUB 
ZXCURSHR J: 
GPRINT @(G): 
GOSUB 1 ぼ 9: 
CURSOUR J+2 


:GPRKINT 9INEXT 


JiCURSUR フォ * 
GPRINT giGUTO 
4 1 

CURSOUR 3:PRUSE 
"FRITRS II 2E=18 
っ = り , = : B ニ 8: し = 
64:MRIT Pi 
PRUSE "TOUP jjX 
$jH 


621 
9P: 


199: 


: ロ $=" り 1929393g2 


り 1 り 1 ':B$="983E 
1C1C149898": し $ 
=" 492969692949 
49':$=" り 919193 
り 69 ノ 93" 


: 上 $=" 98981C363E 


1C"iF$="4949 り 6 
3g2g69「: GO$=" り 1 
り 19292292"i 日 $ 
=" り 898143E3E 1 4 


11 


:[$= ニ "49492929 ノ 9 


29 "1 」$=" り 19 り 296 
92gBgE " : K$=" 98 
14363ES5D フ 2 ノ "1 し ま 
=" 492939296838 


: 1$=" り 4959EBF9B 


"*N$="222 フ ノノ F 
っ D's 0$= "195938 
ノ 868“ 


: P$ ま =" 9292969UgD 
り 939D9E"Id$="14 


14366B6B1C6B ノ ノ 
「: KR$=" 29293958 
っ 86 り 5838『 
GUSUB 393 
RETURN 


:FOUOR 1=1TU 3: 


FUR J=1TOU 38 
BEEP 1i:CURSOR 
0:GPRINT "981C 
り 9899":CURSOR 0O 
: GPRINT "98261 
6"iBEEP 1 
CURSOR 0O 


:GPRKINT "461613 


281843"sNEXT J 
*NEXT 1sMRIT 
・ CURSUR Y: 


PRINT ! "iv=2 
4:CURSOR 1: 
PRINT S: 


GCURSOUR 2 ノ s 
GPRINT 2^(Q-[1) 
SA 

RE TURN 

CLS sFOUR 1I=6TD 
24:CURSOUR 1 
GPRINT B$: 
LURSOUR 1 ユ -1: 
PB 民 RINT " "SBEEP 
1, 33, 235NEXT 1」 
: CURSOUR 8: 
PUSE "Round "5 
Es CLS 


ELS #GPRINT “4 


ノ 4321992 フ F41731 
罰 税 ま INT 5 
GCURSOR 25: 
GPRINT 2^P-1, 2 
^Q ロ - 1 :RETURN 
PRUSE "The END 
SCURE "51 【F 

S>HLET H=Ss 
[NPUT "You are 

TOUP! 。 name"jX 
$ 


:【NPUT "Retrug?" 


の $).1E Z ま ="YP 
GOTO 1 


ピオ ンズ 』」 の ゲー ム 化 。 キ ミ が 騎 才 に な つて 、 競 馬 の 大 障害 競走 を 走り 抜く て の だ 。 


(99 チャ ン ピ ビオ ンズ PONYCA = ポニ ー (分 03-265-6377) MSX(32K) 〇 テー プ \3.500 @ こ の 夏 公 開 さ れ だ 映画 「 チ ャ ン 
 、 ヽ ン シェ シ 


の ど だ Z ル 7 


の ど /7 戸 了 7 ア 7 
男 変 数 リス ト 
O…- 各 / パ ツン に お ける 加 墜 レ 
な けれ ば な ら な い 数 
M-…・- 名 パパ ツン に お ける 加 墜 さ 
れ だ 相手 の 数 
XN-…- 自 機 の XY 座標 
YOG-…… 相 手 の X,Y 座 標 
し …… 明 準 の X 座 標 
P…… 自 機 の 残 つて いる 数 
ヒ ーーー・ 面 数 
5 ーー スコ アル 用 
AB.C,…… ミ サイ ル 表 示 デ ー タ 
(Aー 上 日 中 CO 一 
下 ) II II 
X$…-- 名 前 入力 用 HH 
ws MY イ スス ョ コア キサ 4 
AS,BS,C③,…… 自 機 表示 用 デ 。 條 時 
ー タ (A お 一 上 日 お 條 人 
ー 中 CS 一 下 ) TH 
DS,.E$F……/ パ タン 1 英 表示 伸和 
ーッ LTTLTI 
GS.HS,$…… バ タン 2 敵 表 示 鍛 
カー タ Q 
JS,K$L お …… リ パタ ンコ 英 表示 
デー タ IL 
MSINBOB…… リ パタ ン 4 英 表  ( 生 
示 デ ー タ | 
PB.OSR$… ソ バタン 5 届 表 。 
示 デ ー マ 湖 
3 CCPPP パダン 数 
ノ ゃ < エー 人 入力 用 
O-…・- 爆 発する X 電 
F…… キー 判断 用 
還 プ ロブ ラム の 説明 
1- 5 初期 設定 と メイ ン ル 
シン 
6- 9 キー 判断 ルー チン 
10 自 機 表示 ルー チン 
11-- 27 相手 物 動 ルー チン 
30-- 31 自分 の ミサ イル 
40- 42 相手 の ミサ イル 
43- 44 相手 の RND ミ サイ ル 
50- 55 初期 ルー チン 
60- 62 爆発 ルー チン 
90- 91 デモ ルー チン 
100~101 ゲー ム オ ー バ ー 
還 チ ェ ッ フ ボ イン ト 


相 ま の 攻撃 は 、 な か ガ な か し つ 
こぐ 最初 の うち は 、 な か ガ な か 敵 
を 破壊 で き な い ね 。 敵 の 攻撃 を 
少な ぐす る に は 、12・16・22・ 
24 行 の RND の 値 を 大 きく すれ 
ば 、( 例 えば 12 行 IF _RND 16 
= ノー) よ い 。 自 機 の 残り 数 は 
な の で 、 1 行 の 値 を 大 きく し て 
も いい ガ が な 。 そ れ か ら 、 ラ ンド 
クリ ア の 時 点 で 自 機 の 残り 数 を 
増し て も いい ね 。4 行 の GOSU 
B 90 の 前 に ピ ミ ロ + 1 : を 入れ 
よう 。 支 バ ッ チ リ 賞 。 


ざ Z 


な ん と PB-100 で パパ チン コ が で きる 
の だ // 画面 は パチ ンコ 右 の 一 部 を 上 
か ら 見 て いく っ て 感じ 。 し か も 、 吾 は 
全国 的 に (18 歳 以上 の な と な の あい だ 
で ) 人 気 を 集め た スリ ー セ ブン な の だ 。 

最初 に 1 一 4 の 耕 の うち 、 ひ と つ を 
選ぶ 。 こ の うち ひと つが よく 出る 訓 で 
- ほか は あま り 出 な いよ う 仕組 まれ て い 
る の だ 。READY ! と 表示 され 、 玉 が 
左 か ら 飛 ん で きだ た ら 、 好 き な と ころ で 
スペ ー ス ・ キ ー を プッ シュ (か わり に 
国 を 押す と 、 持 ち 玉 と 残り タイ ム 表 羽 
玉 が 下 に 落ち は じ め る 。 玉 が セー ンプ 容 
(V) に 入る と 5 発 増え 、 6 段 目 の モ ー 
ジグ 穴 だ つう だ ら 、 ぷよ いよ ラ ィーノ テ だ 。 
画面 が ルー レッ ト に な る の で 適当 な キ 
ー を 軽く 押し て 1 つ ず つ 止 め よ う 。 7 
が 1 つ で も 出る と 5 発 打つ あい だ 8 段 


デン 


oc で 
へ 下 琴 計 蜂 
誕 情 e 誠 
一 ③ 涯 当 汗 


ー の で さて 可 ③ は さき は まで て 沸 V 四 
ン <w 避 


最 
近 
ノバ 
テ 
4 
っ 
て ヒ 
トン 
私 ボ 
も | 
ど ル 
うな 
し と 
て の 
も ン 
の 。 


ASw ン サー 革 SS と ン 交 (TSN 本 


へ 遇 。 人 AT は Je どき 光 へ 滞 き は い 
N ロ NO kw は eSO 寺 GO ご 


We 
ピン 


目 の ポ ケッ ト が 開き っ ぱな し に な り 


7 が 全部 そろ うと 最後 まで 開い た まま 。 


持ち 玉 は 25 発 で 、 玉 が な く な る か ^、 
タイ ム が 0 に な っ だ ら 65、 ゲ ー ム 終了 。 
300 発 出す と 打ち 止め だ が 。 スコ ア は 持ち 
玉 の 残り プラ ス 残 り タ イム 。 


ム ^ ち よっ つと お し か つた だ けど 、 そ れ で も フ Z ガ が 出 た / 


4A ム ちえ つ / せつ か ガ ぐ 開い を の に は ずれ て し まつ だ 。 


16 PRINT "TIHY FEW 
ERViT25:S=160 
16-9:E=B=o* 
09UB 9 

28 PRINT "HE 
50SUB 約 

19 INPUT " 還 護 134 
YiIF TaiTFT 
54 THEN 58 

49 BOTO 39 

58 <=INT (RHH41 
HH 時 25TF = 時 
1 

39 PRIHT "Readyili 
09UB 9 

33 IF Tz9 HHEN 灯 

23 iF fs300 THEN 


すげ 了 53=8 『HEN 約 

1 HH=115=5-1:P 
RINT LSR 昌 
LR 1 TP 

9 PRINT ESR Hi"0" 
5 計上 上 = 5 

EEF EET に" | HEN 


ミ ゴ 
iz ま F KEY= ニ "= THEN 
3 
139 放 叶 ciPRINT ES 
R 時 Hi 


iF 9 THEN 1 
iTO 119 
199 TF INT 【RHN) 
ti=HiiF Ri 時 間 


「 還 こ 
と 


1 FET IFRHN 失 時 
+1= 有 HH).5 時 ピ 


Fe 

9 FRHE【HZ23=M 
i =1 

2 Bs PRINT iPRIN 

抽 証 に E に に 本 

「 HESR HiB$j iR0S 
UB 

1 3 0 レ も 


<・・iiPIESR 昌 
89: 0SUB 5 絢 
195 9=25PRTMHT 『!・ 
EZ2TEESR 昌 
jin0SUB 5 
:99 DsPRINT "『*・ 
ロロ 。 *15*IESR 昌 
j8$3 : ロ USUB 5 
z9O D=4sPRINT "Tyx 
yi4TYESR 昌 
9 : HOSUB 5 
dEF Hi iREN 35 
215 =JiPRINT "【・・ 
を BLSR H 
Bi ipOSUB 5 


の ゲーミング") Murder.Anyone ? つ レ ー ザ ー デ ィ ス ク 株 式 会 社 (人 な 03-494-1111) 〇 PX- 7 +LD-700( レ ー ザ ー デ ィ ス ク ) 〇 テー プ +LD 
ッッ ん / Y9.800 @ 迫 力 あ 実写 画面 で 楽し め る 、 ミス テリ ー ジ ド ペ ンチ デー 


TINY FEVER 


9 D=hsPEINT "『・ 
Ve ・ iD ELGR 昌 
ji:hOUSUH 5 晶 
zzo jiF コロ 1 『HEN 93 
ェ 3 0=fRPRINT "・・ 
1 5LSR 昌 
:B ま in0S 地 5 開 
asa D=HsPRINT ! ほ ・ 
ここ Y IGPL5R H 
1 H5 
彰 FE ュ 15 0 ES 
3 WV 5LSR H 
HB 
45 nUSUB 0 
z99『F ロコ 1 『 有 FN 93 
zaJ DIPRTWT "TL _ 
SE 
人 pUSUB 5 昌 
iEF MiE= 


」 


3 PRIHT :PRINT _B 
HLPiiisn ロ 0SUB ます 
3 PRIHT "は 計 : 
3j: ロ USUB #9i50T 
15 

3 0TO D*5+55 

395 BUTO 50 

319 5UHTU 618 

315 HUTO 5 旨 

JzB RONTO 3 

szJ BUTO 515 

339 GUTO 9 昌 

3sJ UTO 535 

3 犠 BUTO 545 

345 BHTO 569 

3J# RUTU 5 

599 F 11HZIHOTD 
衣 


5 」F H=9iH-8BUTO 
衣 じ 
1 HHRN 「R 符 - 
jjUTO 『 昌 


1 FE キキ 1 『HEN 8 商 

578 jiF H=9 iHFN 6 

539 ロ OTO 518 

539 』F HH に 5 THEHN 8 

54W ロ UTD 5 

545 iF H=Z THEN 518 

5J9 」F HH THEN 518 

559 RUTO 80 

5b9 F Es1iIF Ha4i1 
F Hzb 『HEN は 昌 

5pJ HUTD 『 暗 

5 jiF 中 5 『HEN i96 

ni PRINT LSE HiB$: 
F 叫 0 
HEAT 上 

509 PRINT ESR Hi"_" 


レー ザー ディ スク を 使っ を ミス テリ ー ア ド ベ ンチ ャ ー 


59J H=HTS 圧 (5-HjB 


TO 5j 
FOR FE TO 3iE 
i FiPEINT : 姓 T 
KR 
3 「=T+Si に 1EPRINT 
LSR HI ViIF 
415iF 上 和則 : 上 キー 


382 IF D45 THEN 798 
63 IF 時 1 THEN 799 
195 50SUB 796:PRINT 


LSR 3 "StaFtE" 
jinUSUB 約 


318 BUTO 

3 拉 BUTU D*1B+99 失 

338【F HN25IF HH T 
FN 519 

34# FRHNKH18 FH 
に 時 す 人 人 

345 BOTO 375 

359 IF He4EIF Xp [ 
EN 5i8 

369 jiF RH 有 HKHZ1W FH 
EN 9 

3 HHTSBH iH-5jiP 
RINT :RETURNH 

3 すけ HHTSH (5-H)P 
RINT :REIURN 


は 上 :FR 計 間 田 


19 L 世相 5 は 1 
に 昌 ) ュ 195 上 ( 有 0) 

io PRINT ESR jiL(H 
お KEI THH 
EN 18 

35 =J1Z: 作 WT 日 

則 F 上 お 計 幅 呈 1】 

ゴゴ 
415 上 =F+15 計上 ュ 5jE= 


3 FOR 0W TO 3 

9 IF L(0)=fiE=5 

55 HEAT DFOR に 9 
TO 99:MET FEPR 
INT :RETURN 


19 PRINT "Mo Baii 


PS 
1 FRINT "ScoreiT 
1535 1 し (5 すし = 
1 
9 
1 上 上 = 月 HE09 


MEXT FiPRINT :R 
ETURN 


ん A だ ZIA7 
ユメ / コ 


画 変 数 リス ト 


の …… 調 子 の いい 人 台 
日 …… 調 子 
A…… 玉 の 位置 


JL( )O 〇 …… ス ロッ ト 用 

LIM 上 IN…… ス ロッ ツ ト 数 字 

田 プロ グラ ハム の 説明 

選 O 

10-- 20 タイ トル ・ 初 期 設定 、 
ハイ スコ ア 表 示 

30<50 台 の 選択 、 調 子 の 決 


し ーー」 


圧 LTIT 
90~180 玉 の 打ち だ し サ す 
185-265 玉 の 落下 HHTT 
300 持ち 玉 、TIME 表 示 すす 
500~700 玉 の 行先 決定 ゴイ て 
800975 玉 の アウ ト ・ セ ー フ = 上 


に TTT 
決定 PTTT 


FP1 フィ マー バー スズ スロット oi 


P4 オ 持ち 玉 ゼ ロ 
P5 スコ ア 表 示 
PO 時 間 ガ せ ぎ 
弄 チ ェ ッ クボ イン ト 

PB-100 の 小さ い 液 晶 を 、 ス 
一 放さ せる こと よう て 、 
バチ スゲ ー ム を 作 づ て ぐれ だ 。 

し か し レ メ モ リー が あと わざ か 
し ガ 残 つて いな い の で 、 何 ガ 付 
け 加 える の は 苦し いね 。 

穴 に 入 つ て 増え る 玉 数 を 多く 
し レ し だい 人 は 、P0-800 行 の =† 
十 5 の ら の 値 を 増やし まし よう 。 

スロ ッ ツ ト で 、/ ノ が な が な か が 出 
せな い 人 入 は 、P1-45 行 に ビビ = ヒビ 
填 ご : 閉 上 = 6:E= ニ 〇 、50 行 の ヒ = 
ら を ヒーO こ らい に し て みれ ば 
ご うつ が な 。 文 バ ッ チ リ 賞 。 


じ マ 2/2/ 記 ニニ 人 


ざ の 


|6 旧 で 左右 移動 。 141 で 地面 に 伏せ 、 
サー チラ イト か ら の が れる こと が で き 
る (た だ し 3 回 まで )。 また 立ち あがる 
と き は [5 キー。 壁 が *1? の と き は どう 
や っ て も 越え を られ な いけ れ ど の と 
き [0| キ ー で ジャ ンプ "/ 脱走 成功 で 100 


*。 拓 び 方 

キミ ( 更 ) は 脱走 者 。 サ ー チ ライ ト ( 罰 ) 
に 見 つけ られ な いよ う 壁 (まだ は i) 
の 外 に 逃げ だ を う 。 


ビス トル を 撃っ て くる の で 、25 カ ウン 


ム サ ー チ ライ ト が こっ ち を 探っ て る 、 や ば いし 雰囲気 。 


A^ ん つ ! な ん だ ガイ ヤ お 予感 。 用 貝 し て 伏 は ちゃ お うつ と 。 


ム や つと 壁 を 乗り 越え た と 思 つ だ ら 一 斎 射撃 。 無事 、 輝 げき れる か !?. 
ワ /// 


点 の ボー ナス だ 。 で も まだ 外 の 警官 が 


ト の あい だ 逃げ まわ ろう 。 逃げ きれ た 
ら ボ ー ナ ス 100 点 で 1 面 終了 だ 。 

も し サー チラ イト に つが まっ た ら 恐 
怖 の ラッ シャ ン ・ ル ー レ ッ ト (6 発 の 
うち 1 発 だ け 実 議 の 入っ て いる ピス ト 
ル を 交互 に 自分 に 向け て 撃ち あう )。 こ 
れ を 拒否 し よう も の な ら 、 い き な り 地 
雷 原 に 投げ こま れ て し まう の が だ 。 

地雷 は DEG 表 示 の と き CSR1 一 3 
-、RAD な ら 4 一 7、GRA で は 8 一 
ー11 に ある 。 [6I で 1 歩 前 進 、 で ジャ 
ンプ "し て 乗り 越え て 刑務 所 に も どっ て 
RS り 直 じ 。 


NL 
9+ へ 94 


Q で 装 直 。HWe 人 能 計 『 


ー 装 コー メロ ワー の 」 革 汁 筒 S 層 瑞 ご さき て 
4 9 汰 球 の で いつ 。 ど ke 
キー の で ③ 較 陸 。 叶 四半 画 S 


貴 @ 〇 いら エピ ド 溢 本 洒 人 寺 箇 注 融 本 吉 
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一 変数 リス ト 
|…… ル ー レ ッ ト の 弾 の 位置 、 地 
雷 の 位置 、 判 断 用 


お …… 弾 の 種類 
AS$…… 脱 走者 (自分 ) 
C…… サ ー チ ライ ト の 位置 
D…… 自 分 の 位置 

O 〇 …… 羽 せる 回 数 
ss スコ 宛 
X…… ハ イス コア 
Y$…… ハ イス コア 保持 者 
F…… 壁 の 決定 


固い 

1 計 ま 1 用 N 相 

5 時 "75 
ー ロ りー 朝 s 日 ニ 1。 電電 

| ppTNT "RUN awa 
yanUSUB 的 

z9 PRIHT "Hgh"iij 
inBUSUB 的 

39 FRINT "by "iT 
jihHSUB 約 

彰 し = け [NT ER 有 HH*5 
』-3 1F LE295=1 

98 15L=9 

59「F=INT (KNH4): 
fF 上 =1iHW-* 

IF F=3j BT・ 

89 PRINT CSR 


下 PRINT SR DiH$5 
LSR DD 邊 5LSR 1 
Hi は 
1 拉 IF 時 =" キ "iTF D= 
LiHFM 
は EF KEY 4WiHFB 
Ji ロー 1 
EEF KEY に Gi 時 = 
『 
199 IF KEY に 6 IF H 
3 も D2W5D- 
'。 . 技 4 
1 利 KEY"-HHF 昌 
す 4" キ IF DC9jD= 
11 
159 IF KEY=VWPIIF HB 
3 リュ F D=93D= 
inUTU 178 
16# RUTO 境 
9 PRIMT ESR 9i! 
SR 111" 呈 PiG0 
3UB 約 
it9 PRINT "Bonus 1 
"iiG0SUB 約 :H 
=H198:50TO 料 


1 に":・90" iD=5s = 

R=75 

放 上 昌 『= 午 THT 

z すう =TNT 『PHIt 
1 才 ) 

39 NEXT 1 

章 FHR 5=1 『H』 

3# FOR WTHT 

54 PRINT [SE J(1): 
WID(6,1)5 

間 財 WTI 

39 PRINT [SR 35L 
SR DiH 持 5 

99 EF KEYS "TiOSUB 


iTFOR 1 FT『 


iz IF が)=DiB0SUB 
お お: 印 衣 妊 

58 EXTI 

1 RR-EEF 区 遇 名 
3UB 約 :5OTOD 258 

iTF RI 靖 PRINT LE 
DR 1 5 

99 FR TU「 

159 PRINT ESR (お 


1 旗 T 

198 F Rz29T=5 

190 IF Rz195T=5 
メ 暗 IF Rz5iT=7 

zi8 BOTO 18 

zzd PRINT CSR Ds* “ 


39 IF KEYET6WEIFBD 
y5 りー1 
訴 上 F KEY="-HHFD 
(9jD-D+1 
ェ 45 RETURN 
zo# PRINT "Bonus 19 
PsiBOSUB 約 iH 
=H1 間 : 時 1: 
= 
z56 IF HH は 4009:5-] 
zi HUTB 科 
P2 


} RUSUB 約 
3 1: 計 生 ? 

8 PRINT "Pay Rus 
51an ROulettei" 
jinUSUB 約 

HPRIHT "Hera js 
3 PiSt01i"3iH0S 
HB 約 

39 PRINT "SPun ar 
avOIveri "iiHUSU 
8 航 

相 1 前 HH 短 還 う + 


は 間 PRIWT 日 3) 1 頒 P 
ji:gUSUB 的 
5W ENPHT "Pau ("/ 
"Yau* 
iF 時 =*N" THFEN 
#5 
9 【F 計 1 THEHN 138 
9 RMT 【 SR 5? "人 
ji5USUB S:! に 


5 PRIWT 3 ドコ 1 島 6 
"5USUB 換 

1 9 旨 PRINT LO 生 P ii 
50SUB 約 : 時 ="En 
呈 P" 

19 上 1 『HEN 3 

128 PRINT [SR 5 
snUSUB 約 に 
9+1i ロ UTU 59 


159 PRINT ESR 3 "Ho 
和 miiPiiUSUB 的 
148 PRINT 時 Lose 
USUB 約 
198 【F 時 Yo 馬上 = 
は = 旧 hUTO 朝 
159 BUTO 絆 


P3 


抽選 ロ ロ ピ 三 ) 

1# PRIMT " Be zowa 
rdPsRUSUB 的 

z8 [=iNT (RE16) 
+ii 間 DE # 

39 IF iDHOE 5 

HEF fs8iNODE 5 

9 PINT [SR 115"_ 


59 PRIHT CSR DB45 
18 IF KEY*"rG0SUB 
119 
9 IF 0=1iPRIHTE 
SR DiH45:605UB 
HE 日 昌 日 
失 
9 IF i=D THEN 159 
1 暗 0TO 69 
119 PRINT CSR Di" * 


1 IF KEY="6"iD=D+ 
1 

is9 F KEYT="-WIIF D 
= す お 3 日 900=D+? 
中 に 1 

148 RETURH 

i59 FOR = 0 335 

ipb9 PRINT ESR DiH: 
LSDR Ds 

1 中 NEXT ii50SUB 約 


inUTU #4 
1 
19 PERIHT "ame iv 
sriiiBUSUB 約 : 
『= 衝 


zd PEINT " Score's 
iRUSUB 5 

3 iF HDSX=HHi TMP 
間 遇 F| 「 っ 

18 INPUT "Replay(『 
ロメ 】 

3 F ="YY THEN 
朝 

59 PRINT *′ Banod by 
ai sEND 


FUR E=# FH 200 
NEMT E 
PRINT IgEFHRN 


CC 
し に] 


『… 9 
LOT 1 


UNBoe YOM OF "GOD( 
ノ や SS | リプ レイ 入力 用 
較 プロ グラ ハム の 説明 
PO 脱獄 
1 ゲー ム 中 タイ トル 表 
志 防 止 
D 初期 設定 
10- 30 初期 画面 
40- 50 ライ ト の 位置 決め 
60- 70 壁 決定 


60-- 80 表示 
100 フイ ト に 照ら され だ 
ゆ 


110 て 160 キー 入力 判断 
170-180 ジャ ヤン プ と ボー ナス 
P41 脱走 
1 初期 設定 
10- 30 弾 位置 決め 
40-100 表示 
110 て 130 弾 に あ だ つ だ か が 判断 
140 カウ ンマ ダー 減ら し 
145 一 170 表示 を 消す 
160-210 タイ ム に より の 弾 を 増 
や す 
220 自分 を 消す 
230-245 キー 入力 判断 
250-270 ボー ナス 表示 、 伏 せ 
る 回 数 を 減ら す 
P ど ラッ シャ ン ル ー レ ッ ツ ト 
5 設定 
10-~- 30 初期 画面 
40 弾 の 位置 決め 
50 て 120 メイ ン ル ー チ ン 
130 一 160 終期 画面 と 飛び 完 判 
定 
P づ 地雷 地帯 
1 20 て 40 初期 設定 
10 初期 画面 
50<60 表示 
70,.110-140 キー 入力 判断 
60 到着 判断 
90-100 地雷 爆 発 判断 
150 一 170 米 発 表示 
P4 ゲー ム オ ー バ ー 
PO ループ カ ウン マター 
一 チェッ クボ ポイ ント 
癌 画面 た も 、 な か な が ガ 凝 つて 
いて 、 ガ なり の 遊べ る ね 。 だ だ し 、 
残 り ス テッ プ 数 は O な の で 、 自 
分 で 改造 する な ら ば 、 う まこ ぐ 削 
ら な いと だ め だ ね 。 
脱走 の と ころ は 、P1 の 1 行 
や ニ “生還 O 〇 "の m を 1 つめ ぬく ぐ 。 
160-200 の R に 対す る 値 を 小さ 
ぐす る と 、 難 し く な る 。 
支 バ ッ チ リ 賞 。 


クア 


日 の コー ス 。 
WW 


WW 


0 NE 「 守 _ 
ン 更 "と P 
ナチ 大 は ち つ B 
ャ 田 2 な 私 に 
1 て 人 み が は 
を すし に き 左 
失い 全 の 導 
き は 国 、 残 す しき は 還 ( 最 初 は 還 ) を 入 中 だ な 人 
_ _ tv も \ さ 
力 。 い き な り レー ス が は じ ま る 。 敵 の を まん 大 ちる 
車 が * YA7YAZ の 順に 近づい て 〈 る 暫 プ 1 こ ュ い 
' 3 8 6 > ョ 思 レ 
8 の て ]4I6I で か わし て 進 も う 。DAMA 待 ン 清 ンー いしい [| 
とぶ [ リラ と 
導 び 方 CE が 50 に な る か 制限 時 間 を 越え と 2 。 いり が 
RUN き せる と “CLEAR(Y/N)Y と ゲー ム オ ー バ ー。 で も 旗 (P) を 取る と ド を の 9 に 


o】 


きい て 〈 く る の で HI-SCORE を 消す と DAMAGE が 0 に な る ぞ 。 


P6 25 iF BA25IF BSSH 草 365 IF Hz5iPP-Yi0 夫 519 ZZtiiIF 51i1 柚 525iF OcPEIF MS 東 29PRITI 3 1901 1F 522000 だ ICU 
2 PRINT "SHF 有 1 が T9 399 F Zz53jPRINT CS "TETtt1:D=Dt19 : 50) KU? 
2 49 IF MVTVHIF BS | 366 IF 有 R15jP=PTWi6 R 5 "PsiJ 半 iPRINT CSR P-1: 1002 jiF Sc159506 に 71B 
4 iNPUT *CLE 有 RY/ 9iF=25:P=3 0T0 368 512 IF な 54:J9 "(Vit50S0B 9 UE 【10U 
DDY 45 iF Hz350SUB 19 | 387P=PY 515 IF RCS:PRIHT KS 8 125 時 190:60T0 29 | 1983 !F Sz109IF 了 1 
5 IF 6=PYWYVWRE : 9 308 IF Pz9P=1 ュ ョ ッ テ ョ ェ ト CD と ・ 5s27 IF 0459 THEN 95 | 319 7=INT CR 間 科 42): ji0$="(RDKYUU" 
0 R 7 入 7CSR6i | 3 人 
時 =*PB-396"iF=2 | 59 IF R14560S0B 2 | 389 IF Ps7iP6 wrtFSR 9:TD[ RETURN 1093 IF Se795IF 軸 3 
00 31 F=Ftt:IF F=295F 中 | 556 60TO 29 0 が DF Me 
本 所 "日. ば 左 店 ご .) 3z jiF「>255BOSU8 3 82 時 =TTTIPH | 517 T=T+1ETF Ts 用 PP | 98 PRINT iPRIHT "6 NT "MRHLL 0D=D | 1006 IF 5c495IF 誕 55 
本 全日) 三 日 ご . 6 _- ビ | IHT ESR iT 0 Of IPoint NO。: sir5i0= 和 了 P) ご 生 有 」、 
10 9=Yn00 タ 90 35 中 1 暗 THENT | 315 RETURH R TURN 1816 PRIHT "You Hre 
9n7222000n = 村 459 5$=KEY =2B 1 ax 195 T=T-HED=0+T:S=S 959 PRINT :PRINT * 095" Driver! 
59 GOT0 458 469 IF 66=*4"50- け -1 PPE DRcNtIEIF 929 5 穫 E OVER KYOWT 
11 PRINT "Hign br | :98 OSUB 919:0--Y :IF 0<650- sUB 928 13= の "Point NO | 1912 IF FIF CDSL 
iver.053) HIS | 118 時 HHHEIF 時 45 時 | 479 IF 6=650=041 | so1 jiF jckfF assN | 「19 PRINT "Over ti "RED =StF=WWPRINT "Y 
5 3 499 V を - 電 ID(H,6) =WsPRINT PSR at mase。 | 9 PRINT "Crashi D gur 9et Hi9h'Si 
12 0-4iMN=TTVEP=s | 12B KEIURN 499 PRINT :PRINT CS eeeetiH 和 1:50 57 MISS.55 DD T=tTEER ENPUT "Hame'U 
Ri 時 116:K=7:N | 289 50S 昌 916:0-9Y R 7T sUB 989 115 IF RA6 THEN 1 ETURN 9 
=1: 時 9 219 了 時 FtEIF 時 145H 599 PRINT CSR 5 中 " | so TF nzTzPRINT S M 399 「=5:D=9sPRINT i14 PRIHT" 『HEE 
29 B=INT (RRHe16) =9 iCSR 15VS5CSR 0 p 5*tDDY)YrE0 | 118 IF R=S5PRINT P "Checer Fla9e'i IE 
:IF He9 THEN 49 | 9 RETURM OCSR Pi sUB 928 RINT "Rine cose 「RETURWN 
39 iF Be 時 1 309 M$=WD(F,1):605 SR 8952 eri=1iK=6 1090 IF 5>200309=*Ba 
UB 919 人 
田 変 数 リス ト ・ AA…… コ ー ス の 変更 用 ・ 200 一 220 を カー ブ 時 の 処理 - と GAME OVER 
|K…… 人 道 は ば 用 * 委 YSe 融 数 ・ 300-315 他 車 が 出現 し た と き : 玉 チ エッ フク ボイン ト 
M…… 取 つた だ チエ ツ ッ カ ー フ ラッ ツ ・F…… 他 車 の 変更 用 ・ の 娘 理 ・ 残り が あと 74 ス テッ プ あ る の 
グ の 数 ・G$……KEY 入 力 用 ・ 250 と 4/0 キー 入力 ・ で 、 ト ン ネ ル の ある コー ス な ん 
フ .… 走 行 距離 ・V$…… コ ー ス の 表示 用 ・ 460-500 画面 表示 ・ ガ を 加え て も いい が ガ な 。 
SMI ら 9 ・NJ…… チ エッ カー フラ ッ グ の : 510~530,920.970 て 980 チエ ツ ・ リプ レイ が で き な い の で 、950 
Tee ギル 有無 - カー フラ ッ グ 、Rain ・ 行 と 1014 行 の END の みわ り に 
Os の 三 9 ・O……- 最 低 ミ ス 数 5 コー ス 設 定 、 衝 突 処 ・ GOTO2 を 入れ よう 。 他 の 車 を 
R…… 面 数 ・ 較 プロ プラム の 説明 ・ 理 ・ か わす と 制限 時 間 が 1 増え る が 、 
$…… コ ー ス 、 敵 の 車 キ ャ ラフ : 2-- 12 初期 設定 、 初 期 画面 : /00 一 725 面 ク リア 時 の 処理 : 310 行 の =H+ 1 の 1 の 値 を 大 
〇 …… 自 車 の 位置 日 [表示 等 ・ 910 乱数 発生 ・ きぐ すれ ば 、 制 限 時 間 を 多 ぐ 増 
WS$⑤…… 他 車 表示 用 ・ 20 60 コー ス 設 定 、 他 車 の : 950 GAME OVER _  : や せる 。 衝 突 し だ 時 の D の 増分 
P…… 他 車 の 位置 ・ 設定 ・ 1000 一 1014 ら 面 フリ アレ だ 時 ・ (525 行 と 920 行 ) を 変え る の も い 
H…… 制 限 ツ イム ・ 100<120 右 カ ー ブ 時 の 処理 : の メッ ツ セ ー ジ 判断 ・ いね 。 廊 バ ッ チ リ 賞 。 


^ 自 分 で 作る MSX ゲ ー ム 『 ゲ ー ム ラン ド 』 ぐ の 発 
売 元 ・ 問 合 先 : カシオ 計 算 機 株 (広報 室 消費 者 
課 谷 03-347-4830) の MSX (8K) ROM カー 


トリ ッ ジ \7, 800 


カシ オ か ら 


\29.BDUMSX 
「 過 V- 万 新 発 売 / 


えっ 、MSX が この 値段 で ? と 段 
い だ の が 、10 月 15 日 新 発 売 の カシ オォ の 
MSX「PV- 7 」 だ 。 お 金 を た め て ポ 
ケ コ ン で も 買お うか な と 考え て いた 少 
年 少女 は 大 注目 だ ね 。 本 体 の PV- 7 が 、 
な ん と 29,800 円 ! これ に 増設 RAM や 
カセ ッ ト イ ンタ フェ ー ス を 付け て も 40 
000 円 で おつり が くる の だ か ら 、 こ れ 
は スゴ イ 。 

この PV- 7 を 買っ て 、 ま ず は MSX 
用 の ゲー ムカ ー ト リッ ジ で 遊び まく る 
こと て し ょ う 。 で 、 ひと と な り ゲ ー ム 
て 遊ん だ 後 、 今 度 は お を そる お そる 本 に 
載っ て いる プ ブログ ラム を 打ち 込む ん だ 
よね 。 こ の 「 ポ シェ ッ ト 」 の こと も 忘 
れ な いよ うに 1 そし て 、 い くつ か の 


4A カ シオ の MSX 「PV- 7」 は RAM 8K な が ら 、 値 段 は \29, 800 と 驚異 的 な 安さ 。 よく 見 る と 他 の 
MSX と 何 か が 違う 。 カ ー ソ ル ・ キ ー の 部 分 が 、 8 方向 の ジョ イ パ ッ ド に な っ て いる の だ (ちゃ ん と し 


た カー ソル ・ キ ー も 別に 付い て いる )。 し か も 、 


トド り カ ーッ キー が 2 個 、 キーボー ド の 左下 に 取り 付け 


られ て いる の で 、 ジ ョ イ ・ ス ティ ッ ク が 標準 装備 され て いる よう な も の 。 写真 は 「PV- 7 」 本 体 を 、 
拡張 ボッ クス (別売 \ 14, 800 円 ) に 取り 付け た と ころ 。 こ れ で 16K の 3 スロ ッ ト 付 マシ ン に 変身 する 。 


さら に 増設 RAM を 加え れ ば 64K ま で 拡張 可能 だ 。 


エラ ー の 後 、 プ ログ ラム を 打ち 込み 終 
ぇ えて RUN! や っ た だ た! と 、 こ れ を 何 度 
か くり 回 す と 今度 は こう 思う ん だ よわ ね 。 
「 自 分 で も ゲー ム を 作っ て みた いな あ 


で も 、 い くら 6 ブロ グラ ム を 打ち 込ん 


だ と いっ て も 、 人 の 作っ た も の を 何 も 
考え ず に 入れ て いた だ だ け の 人 は ね ……。 
キャ ラク タ や グラ フィ ッ ク パ ター ン を 
作っ た り 、 そ れ を 自分 の 思っ た 通り 動 
か す と いう の は な か な か めん どう な ん 
だ よね 。 ジン 人 福 、 ど うみ し よう が 


と ん / 


同時 に 登場 し た 
秘密 兵 響 
「 ゲ ザー ム ラン ド 」 


を こ で 登場 し た の が PV- 7 と 同時 に 
出 た カシ オ の ROM カー トリ ッ ジ 「! ゲ ー 
ムラ ンド 」 だ 。 も ちろ ん PV-7 以外 の 
MSX で も 使え る MSX 規 格 の ROM カ 
ー ト リッ ジ な の が だ 。 

き て 、 こ の 「 ゲ ー ム ラン ド 」、 キ ミ の 
ォ オリジナ ル ゲ ー ム を バン バン 作り 出す 
魔法 の カー トリ ッ ジ な ん だ けど 、 と ん 
を ゲー ム が 作れ る か と いう と 、 パ ッ ク 
マン に 代表 され る 迷路 型 ゲ ー ム 。 そし 
て イン ベー ダー に 代表 る れる シュ ー テ 
オル ググ 天 ゲ ー ム も 人 も る 。 まだ スイー 
スラ ロー ム の よう な スク ロー ル 物 も で 
きち ゃ う ぞ 。 


や ざし い 
メニ ュー が キミ 
を 導い て いく 


それ で は きっ そ 〈《 「 ゲ ー ム ラン ド 」 


の カー トリ ッ ジ を スロ ッ ト に 差し 込み 、 


Power ON! まず は スク ロー ル 画 面 
の 中 を ジェ ッ ト 機 が 飛ぶ か っ こい い デ 
モ 。 ス ペー スキ ー を 押す と “ゲー ムラ 
ンド で な に を し ます が と メニ ュー が 
出 て くる 。 
>1 ゲー ム で あ を ぶ 。 

2 テー こ の を つく る 

3 ゲー ム を な お す 

ん が ダ が 一 ム を よさ みこ び 

5 ゲ ダーム を ほぞ ん する 

>” を カー ソル キー で 上 下 し て 目的 
の と ころ で リタ ー ン キー を 押す 。 もち 
ろ ん 最 初 は ゲー ム が 入っ て な いか * ら 、 
2 の ゲー ム を つく る” を 選ぶ の だ 。 
する と 今度 は パ ゲ ー ム の し ゅ る い は ど 
准 に し ます か が も きい て くる 。 
>1 せん と うし き ゲ ー ム 

2 めい ろ ゲ ー ム 

と 、 表 示 き れ た 。 こ れ も カ ー ソ ルキ 


ー と リタ ー ン キー で 選べ ば いい の だ 。 


クタ 


ヤマ 璧 を セッ ト し て か ら 、 ポ イン ト を お いて いく 。 


カー ソル ・ キ ー と スペ ー ス ・ キ ー だ け で あっ と 


いう ま に 背 景 の で き あ が り 。 


この よう に 、 こ の 「 ゲ ー ム ラン ド 」 で 
は メニ ュー を 次 々 と 選択 し て 1 つの ゲ 


ー ム を 作り 上 げ ら れる の で 、 初 心 者 の 


人 で も ちょ っ と いじ れ ば 理解 で きる だ 


ろう 。 


育 景 も カン タン 
に で き あ が っ て 
し まっ た 


き て 、 2 の びび め いろ ゲー ム ” を 選ぶ 
と うな か に か し ます か と きい て きた だ た 。 
背景 、 キ ャ ラク タダ タ 、 音 、 ス トー リー の 
どれ か を つく る の だ 。 ま ず は 、 背 景 。 

迷路 ゲー ム で 大 切な の は な ん と いっ 
て も 迷路 ! (あたり まえ )、 壁 の 配置 を 
シー くい 

壁 は すでに 白い タイ ル が セッ ト さ きれ 
て いる 。 床 に は 8 ドッ ト ご と に 目 EU が 
ある の で 、 こ れ を だ より に 壁 の キャ ラ 
クタ を 配置 し よう 。 左 上 に ある 四角 の 
マス を カー ソル キー ザイ 移動 きせ て 、 セ 
下る あこ ろ 人 も っ てき に ら ス ペー 
スキ ー を 押し つつ カー ソル キー を 押せ 
ば 壁 が ずら ずら と セッ ト さ る れる の が だ 。 

これ は きわ め て 簡単 。 

間違え て 壁 を セッ ト し て し まっ た だ と 
き は リタ ー ン キー を 押し て 、 メ ニュ ー 


に も どっ て 、 通 路 を 選ん で 豆 の キャ ラ 
クタ を 通路 の キャ ラク タ で 消し て し ま 
を ば いい わけ だ 。 

た だ し 、 メ 迷路 を 作る とき 気 を つけ な 
けれ ば な ら な い の は 、 こ の 後 で 作る 登 


場 キ ャ ラク タ が 小さ く て も 16X16 ド ッ 


ト で で き て いる の で 、 8 ドット の 通 政 
キャ ラク タ は 2 個 分 間 わ あけ な いと ゲ 
ー ム に な ら な く な っ て し まう の だ 。 こ 
この と ころ 、 上 区 点 と いえ ば 難点 だ けど 
93 。 で も 自分 で ゲー ム が 作れ る 楽し 
き を 比べ 作 は と うっ て こと な い 衝 。 
さて 各 の 配置 が 終わ っ た ら 次 は ポイ 
ント (得点 ) を 配置 し よう 。 こ の ポイ 
ント の キャ ラク タバ パタ ー ン も すでに 決 
まっ て いて 、10 点 、20 点 、30 点 と ある 。 
ポイ ント も 盛 と 同じ よう に モッ ト す れ 
は いい の だ 


キャ ラク タタ 作 り 
は 編 を か くみ た 
い に 楽 し い ぞ / 


ヤメ イン ・ キ ャ ラ は パコ ちゃ ん に し て み ま し た 。 
右向き 、 左 向き 、 後 向き も 作っ て みた 。 枠 の 右 
側 に な らん で いる の が その 実物 大 キャ ラ だ 。 


ドド エズ スス エエ スズ スミ 2 肖 衝 ん. 
に よ 。 レス メ 。 
多年 和 乱 

参入 人 信和 区 


さて 、 背 景 で ある 迷路 が 完成 し た ら 
次 は 登場 キャ ラク タ を 作ろ う 。 ファン 
クシ ョ ン の 1 番 を 押し て 背景 メニ ュー 
か ら 1 つ 前 の メニ ュー に も どっ て “ キ 
ャ ラク タ を つく る” を 選ぶ 。 自 分 か 他 
の も の か 、 向 き に よっ て 形 を か える か 
キャ ラク タ の 大 きる は 、 等 の メニ ュー 
を 選ぶ と 、 や っ と こき キャ ラク タ を つ 
る と いう メニ ュー が 員 た 。 

実は この 「 ゲ ー ム ラン ド 」 の 中 で い 
ちば ん 気に入っ て し まっ た の が この 部 


分 で 。 ス フラ イト を 使う た キャ ラク ダー 


お 選 計 きる 


が ビ 
コー ト 
お わり 


が いと も だ や まく 下 き て し まう の 

や っ ぱり オリ ジ ナ ルキ ャ ラク タ を 作 
り だ い の で ドッ ト 単 位 で 作る こと に す 
る 。 す る と 16※X16 の キャ ラ 分 の 大 き な 
ワク が 出 て くる 。 こ れ が キャ ン バ ス が だ 。 

背景 の と ころ と 同じ よう に カー ソル 
キー と スペ ー ス キー を 使っ て モッ ト し 
て い (〈《 だ け 『! 今 モ セッ ト し て いる キャ 
ラク タタ が 右側 に 原寸 で 表示 され る の で 、 
や っ て いる と 楽し く な っ て し まっ た 。. 

さて 、 色 も 自由 に つけ られ る の だ よ 。 
キー ボー ド の 2ー- 3 段 目 の 左 側 の キー 
が 16 色 に 対応 し て いて その キー を 押す 
と ボー ダー カラ ー が 対応 し た 色 に 変わ 
る の で 一 目 で わか る 。 間 違っ た と き は 
穫 明 を 選ん で 1 つ 1 つ 消し て いけ ば い 
いん だ か ら 、 安 心 。 


サン ブル か ら も 
選べ る ぞ / 


この メニ ュー て 便利 な の が ヾ は ん て 
ん (反転 )" と パコ ピー。/ 

だ と えば 、 右 向き の キャ ラク タ を 作 
っ だ ら コ ピー し て 左右 を 反転 すれ ば 、 
左向き キャ ラク タ の で き あ が り 。 つ ま 
り 、 同 じ キ ャ ラク タ を 左右 作ら な く て 
も いい わけ が 。 

また 自分 で キャ ラク タ を 作る の が め 
と うだ 大 区 は ボン クル も いう の 
も ある 。 人 や 動物 、 エ イリ アン や フル 
ー ツ 、 そ し て 乗り 物 等 25 種 類 の キャ ラ 
クタ が 自由 に 選べ る の だ 。 こ れ に ちょ 
っ と 手 を 加え れ ば オリ ジ ナ ルキ ャ ラク 
タ を 作る の も 簡単 。 


エン 
す に はじ ピロ = テン 
に に ピロ テロ 
に は は 抱 所 モロ FF 


ー も ーー まし まで 柱 つ あ 


て 
た っ 


委 
多 
李 
し コ 
金 
錠 
に 2 
吾 
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と 
に 
委 
間 
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人 
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に 2 
に 2 
2 
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作曲 も カン タン に で きち ゃ う (4 小節 以内 と 
いう 制限 は ある けど )。 オリ ジ ナ ル も いい し 、 好 
き な 曲 の メロ ディ で も いい ね 。 


斉 を 入れ て 、 
スト ー リ ー を 
決め よう 


背景 が で どき て キャ ラク タ が で きた ら 
次 は サウ ンド を つく ろう 。 こ れ も メ ロ 
ディ か 効果 音 か 、 等 し いく つか 選択 す 
れ ば いい 。 音 も 自分 で 作り た いな 、 と 
いう 人 に は ちゃ ん と 楽譜 が 用 意 さ れ て 
いて 、 音 の 高き を カー ソル ・ キ ー で 上 
下 し て メロ ディ を 作れ る の だ 。 

楽譜 な ん か わか ら な いや 、 な ん て 人 
に は これ また サン フル" が ある の だ 。 

次 に 効果 音 だ けど 、 こ れ は すでに 5 
種類 決ま っ て いて 、 動 き の 音 、 メ カニ 
ッ ク 、 爆 発 、SF 、 警報 とし 、 い か に も を 
れ ら し いも の が ちゃ ん と 用 意 さ る れ て い 
る の で 、 必 要 に あわ せ て 選べ ば いい わ 
けが 

さて 最後 に スト ー リ ー を 決め よう 。 
これ が いち ば ん 大 切 で 楽し い 。 

今 まで 作っ た 背景 や キャ ラク タ 、 サ 
ウン ド を いか に 組み 合わ せる か 、 と い 
2 た 

自分 や 敵 の 動き 方 ( 英 は 攻撃 し て 
る の か 、 ぶ つか っ て くる の か ) 、 ス ピー 
ド 、 出 て 来る 回 数 等 も ここ で 決め る の 
0。 こと こと の と この て 、 そ の ゲー ム が お 
も 5 し ろく も つま ら な くも な る の で 、 よ 
〈 考 えて 。 


の C74 だ アア 


あっ と いう ま に 
オリ ジ ナ ル ・ 
ゲー ム い っ ちょ う 
あがり / 


央 6 CC て き の が り 、 た な っ だ 
ら さ っ そ 〈 プ レイ し て みよ う 。 自分 の 
作っ た キャ ラク タ が 自分 の 作っ た 迷路 
の 上 を 、 自 分 の 作っ た サウ ンド に の っ 
て 動き 回 る の を 見 て いる の は いい 気持 
も ち だ ね 。 

編集 部 で は 、 パ パコ の キャ ラク タ を 使 
っ た 迷路 式 ゲ ー ム を 試作 し て みた けれ 
ど 、 う ん な か な か の バッ チリ 賞 も ん で 
す 。 こ れ て で 制作 時 間 は た っ た の 1 時間 
だ よ 。 そ れ に 気にいら な けれ ば ぼ ば 、 ま た 
手直し すれ ば いい の だ か ら じ っ くり と 
オォ オリジ ナル ゲー ム が 作れ る わけ だ よ 。 
も ちろ ん 今 完成 し た ゲー ム を 、 カ セッ 
ト テ ー プ に 記録 する こと も OK! こ 
れ で BASIC の リス ト で も 出 て くれ ば い 
うこ と な し な ん だ けど な あー。 

えっ ? アド ベン チャ ー や シミ ュ レ 
ーション も や り だ いっ て ? . ちょ っ と 
それ は 無理 な ん だ よね 。 

と に か も くに も 、 こ れ か ら MSX で 
ゲー ム を 作ろ うと 思っ て いる ビギナー 
の キミ に と っ て は ホン ト に 魔法 の 箱 な 
の だ 。 


い s 記 
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発売 元 三 徳間 書店 < く テ クノ ポリ ス > 販売 元 三徳 問 コ ミュ ニケ ーション ズ な お 、 お 問い 合わ せ は 毎日 、PM3.00 て 5.00< テ クノ ポリ ス > 容 03(295)4610 ま で 。 


キミ の 作品 
お 便り 共 集 


ミミ の 作 つ だ 
リ ジ ナ ルプ 


ケ グー ム に 限ら びす 、 ユー チ ィ リリ ディ ー 
2 イタ スラ ブロ ダグ ラバ な ど 、 オリ ジ ナ 
ル で 楽し い プ ログ ラム な ら な ん で も 結 
構 で す 。 部 門 は 次 の 3 つが あり ます 。 
@ 1 画面 プロ グラ ハーー そ の 機種 の 1 
画面 の 表示 限界 に 入り きる プロ グラ ム 
の ご と で す ( だ と えば O-8801 だ と 80 
文字 X25 行 まで ) 。 

@ シ ョ ー ト プロ グラ ハム 部 門 一 一 原則 と 
し て 100 行 以内 の プロ グラ ム 。 プ ログ ラ 
ム へ に よ つ て は 、 若 干 の 行 数 オー バー も 
許容 し ます 。 な お 、 マ シン 語 の 場合 は 


ン 、 賞 金 が 出る の と 
ルン ル ペ 

人 @ 1 画面 プロ グラ ム 、 シ ョ ー ト プ ブログ 
ラム は 、① ヨ ッ シ ャ 賞 ……5 千 円 ② 
バッ チリ 賞 … 1 万 円 ③ サ イコ ー 賞 


5 万 円 (た だ し 、 本 格 プ ログ ラム 部 門 
で 没 に な っ て も ショ ー ト 部 門 で 採用 さ 
れる こと が あり ます )。 


うに K バ パイ ト を めど と し ます 。 

@ 本 格 ブ ログ ラム 部 門 一 一 単に プロ グ 
ラム が 長い だ け で は な ぐ 、 編 集 部 を 、 
「 お ずつ ! 」 と いわ せる よう な 力 の ある 


も の を 求め ます 。 長 さ に 制限 は な い の 


だ か ら 、 リ スト も REM 文 な ご を 入れ 
る な ご ど ご 、 わ か りや すい も の が 望ま し い 。 


オリ ジ ナ ル に 限る ./ 

あ だ た だり まえ の 話 で す が ガ 、 キ キミ が キミ 
自身 で 考え て 作 つ だ プロ グラ ハハ を お 叉 
いし ます 。 


ー 還 投稿 厳 祭 ノ 
同じ プロ グラ ハハ を 他 読 に も 投稿 する 


よう な こと は 絶対 やめ め て ぐだ さい 。 次 
作 に 次 ぐ 大 問題 に な つて し まい ます 。 


バック アッ プ を 必ず 

投稿 作品 は お 返し で きま せん 。 ま だ 、 
採用 作品 に つい て 電話 で お 聞き する ご 
と が あり ます の で 、 め ゆず プロ グラ ム の 
コピ ー (デー ノブ や リス に な ご ) を と う 
を あい で くだ さいし 


_- ポシェ ッ ト Vol.3 よ り バ ブ 通 信 


すでに テク ノ ポ リス 9 月 号 で バグ 通信 を や やり ま し だ た が 、 ボ シェ ッ ト only の 読 


者 の た め に 再び バグ 通信 で す 。 


倫 P16「 マ ン ゴ ロー ゲー ム 』。 こ れ は バグ じゃ 
な いけ れ ど 、 間 違え や すい の で 特別 注意 。530 
行 DATA の 5 番目 の キャ ラク タ は コロ ン で は あ 
り ま せん 。 し か も 、Key に この キャ ラク タ は 
て こ で て あらかじめ 、F 1 キー に この 
キャ ラク タ を セッ ト し て お く 。 セ ント 方 法 は 、 
a$=chr$(&h7c) :Key1 a$ で RETURN。 

これ で 、F 1 キー で この キャ ラク タ が 打ち 


な い ! 


込め る の だ 。 


僅 P45'Space Reverse」。 印 刷 の 都合 で コ 
スス デー 
トメ ント の 間 に は コロ ン を 入れ て くだ き 


ロン が みん 人 な 消え て し まっ た ! 


い 。 どー し て も わか ら な い 人 は 、 電 話 で 
お ね えさ ん が 教え ます 。 
参 P56『Fire Ball。  X は 、 チ ェ ッ カー に 
(GRAPH キ ー+ オ 0)。 “る 6" は X に 。 人" 
は ^ 金 に 。 それぞれ 読み か えて くだ さい し 。 
欠 P65'Space Wave』。 1 行 …… 
0 TO32STEP3…… STEP3 は STEFP 一 3 の 
誤り 。4 行 PSET (XY) に ,6 を 追加 。 10 行 … 
… パ GOME OVER" は ば GAME OVER "。 
倫 P80『Car Race』。 1 の 写真 が バグ っ て ま 
し た 。 LOAD ミ ス な の で し ょ うか 、 こ ん な か 男 
面 に な る は ず が な い の だ っ た 。 


プロ グラ 


採用 され た プロ グラ ム の gd 光 が 
こ ご の ルー ル を 守っ て いま す 。 


テー ブ で 投稿 


2 0 の 0 の トド デ ョ グ 


36242 
の ) に 、 セ ー プ し て 送っ て くだ さい 。 
① 必 ず 、 ベリ ファ イ す る こと 。 

② 用 心 の た め に 2 回 以上 同じ も の を セ 
に 


NE イル ネー ム 、 機 種 名 等 を テー プ 


に 正確 に 書く こと 。 

④ 1 本 の テー プ に は 原則 と し て 1 本 の 
ロク ラバ を / (ソノ ログラム が 2 
上 入っ て いる と 見 すご すこ と が あり ま 
あ ) 


必要 事項 を 書い た 
手紙 を .2 


テー プ と いっ し ょ に 、 次 の 事柄 を 正 
確 に 記し た 手紙 を 同封 し て くだ さい 。 
も し 、 手紙 が 不備 な 場合 、 プ ログ ラム 
よく て あお ポン に か る こと が あり ます 
① プ ログ ラム を 作っ た 機種 名 ・ 言 語 名 


(機種 に よっ て は BASIC 名 や ペー ジ 
数 や 増設 オプ ショ ン な ども 正確 に )。 
② ロ ー ド 方 式 を 明記 ( ファ イル ネー ム 、 
ポー な ど は も ちろ ん 、 ロ ー ド する た め 
の 0 当 マ ンド 、 や セーブ プ し た と き の レ コヨーテ 
ダー 機種 名 な ども ) 
③ プ ログ ラム の 遊び 方 、 使 い 方 (使用 
キー の 説明 や ゲー ム の ルー ル な ど を な 
る べく 詳し くわ か りや すく 。 ゲームス 
トー リー な ども あれ ば 書き そえ て 〈 だ 
さい 。 な お アド ベン チャ ー ゲ ー ム は 谷 
玩 あ Mo し ま 代 / 
④ 変 数 リス ト (プロ グラ ム て 使用 の 変 
数 名 と その 意味 を 明記 し て くだ さい )。 
⑤ プ ログ ラム 解説 (デバ ッ グ や 解析 が 
し まゆ いよ うに 、 マロ グラ A 人 0 どの 条 
で と うい うこ と を や つっ て る が の 、 人 な どら 詳 
〈 書い て くだ さい ) 
⑥ 参 考 文献 ・ 参 考 プ ログ ラム を 明記 ( プ 
回 グラ ム を 作る と き に 参考 に し た 本 
雑誌 の 年 お よび 月 号 ・ ペ ー ジ 数 、 記 事 
名 ・ プ ログ ラム 名 を 正確 に )。 


(⑦ 郵 便 番号 ・ 住 所 ・ 氏 名 (ペン ネー ム 
パ あ れ ば それ も )・ 年 令 ・ 職 業 (学校 
学年 ) 重 話 番号 も 忘れ ず に に 。 


封 黄 で 仕上 げ ./ 


封筒 の 裏 に も 、 住 所 ・ 氏 名 の ほか 、 
機種 名 ・ ロ ー ド 方 式 を 明記 し て くだ さ 
い 

封筒 の 表 に は 、 プ ログ ラム の 部 門 名 
( 1 画面 プロ グラ バム 部門 ・ シ ョ ー ト プ 
ログ ラム 部 門 ・ 本 格 プ ログ ラム 部 門 の 
3 つが あり ます ) を 赤 て 明記 し て くだ 
さい 。 


あて 先 に 多少 変更 あり 
これ か ら は ポシェ ッ ト 編 集 部 あて で 

も 一 括 し て 受け つけ ます 。 

〒101 東京 都 千 代田 区 神田 錦 BT3-22 

小笠 原 ビ ル 4 F (結局 住所 は 変わ ら ず ) 

の 2 スッ ャ アクラ ム ポシェ ョ ウツ 

編集 部 内 各部 門 係 


あど とい ′ な ん で も の せる ぞ / 


ポシェ ッ ト で は 。、 プ ログ ラム 以外 に 
も 5 、 キ ミ の お 便り や 意見 、 イ ラス ト な 
0 0 計 R2032NR KU ま WS 
だ 。 隣り の 『 テ クボ ポリ ・ ク ラブ 』 で あ 
00 の 
っ ち に 集まる か どう か ヵ か 不安 な ん だ けど 
"(正直 だ な あ ) で も 、 ち ゃ あん と 
スペ ー ス あけ て 待っ て る か ら 、 ど し ど 
し 送ら て お くれ 。 

まず 、 こ ん な ユー ナー を 設け ます 。 


@⑱ プ レイ バッ ク ・ チ ェ ッ クボ ポ イント 
ポ ボ ポシェット に の っ た プロ グラ ム の チ 


広告 。 
紙 に 丸ごと あげ ます 。 


ッ ク ポ イン ト 以 外 に 、 キ ミ 自 身 や 友 
だ ち が 気 づい た 改造 ・ 改 良 の ポイ ント 
を 教え て くだ さい 。 次 号 で 紹介 し ます 。 
な る べく 、 具 体 的 な ゲロ グラ ム ( 〇 〇 
行 に これ を 加え る と こん な に お も し ろ 
く な る 、 と か 、 こ の 命令 は いら な い 、 
と か ) 付き で 鋭い チェ ッ ク を 待っ て ま 
事 ら 


@ 丸 こ 


だ た と えば 、67 ペ ー ジ の ポシェ ッ ト の 
こん な スペ ー ス を 、 キ ミ の お 手 
言い だ た いこ と が 


- と コラ ム ・ レ ター 


品 を や さしあげ ます 。 
ん で す 。 


いっ ぱい ある 人 、 と て も ハガキ に は 書 
きき れ な い お も し ろ い こと を 経験 し た 
人 、 ゼ ぜひ 投稿 し て くだ きい 。 イ ラス ト 
の 好き な 人 は それ も 一 緒 に 。 

を その ほか 、 ポ シェ ッ ト に 対す る 文句 、 
記事 や 掲載 ゲロ グラ ム に 対す る 感想 ・ 
意見 、 を の ほか な ん で も 和 柔軟 に 対応 し 
て いき ます 。 ヨロ シク / 

あて 先 は 、 プ ログ ラム の あて 先 と 同 
じ 《、 ポ シェ ッ ト 編 集 部 まで 。 採 用 分 
に は 、 取 りあ げ 方 に 応じ た 謝礼 や 記念 
担当 は ヤス コ ち ゃ 


あー、 こ の 「 ポ シェ ッ ト Vol. 4 」 の お か げ 
SC カツ Z を CU で し まい まし た 。 は クラ クジ 、 
鼻 は ズル ズル 、 目 は ショ ボ シ ョ ボ 、 お な か は 
グー グー( ? ) ち な み に 「 ポ シェ ッ ト Vol. 3」 
で 、 ク ー の ペン ネー ム の 由来 は 何だ ? と い 
う の を 募集 し まし た が 、 み ん な 「 お な か が す 
いた と き の 音 だ 」 と 思っ て いる よう で すね 。 
補い ます 当 。 実は ね … ヽ 、、 おっと,、 ニニ ん な が こ 
と 書い た ら 夜 道 で YAMAHA の RZ-250R に 
ひか れ で し まう 9 か な / や w め た 。 

と ころ で 、 今 回 いろ いろ な プロ グラ ム を 見 
て て 気 に な っ た ん だ けど 、 英 語 の 間違い が 多 
い ぞ 。「ANY KEY」 が 「INY KEY」 に 、「S 
TAGE」 が 「SEARGE」 に な っ て る ん だ も ん 。 
その 他 に も か な りあ っ た ヨ 。ERROR に な ら 
た KS が らら つて で て 、 見 ざし て (は いけ ませ ん だ が 。 
類 を つけ て くだ さい まし 。 (2/ ペ シマ) 
は じ め ま し て 、 私 は エイ キチ と いう 者 で す 。 
テク ポリ に は 、 ユ ウキ チ と の っ て まし た が 本 
当 は 、 エ イキ チ で す 。 ポ シェ ッ ト の M Z の 担 
当 に な っ て 喜ん で いた ら 、 リ スト は 切り は り 
の 山 。 ぶ きっ ちょ な 私 は 、 泣 き な が ら 切 り は 
り を し た の で す 。 つ いで に 編集 室 で の 先輩 で 
ある た けち ゃ ん は 、 大 学 で も 私 の 先輩 だ と い 
うこ や か が がり まま もじ た 。 (エイ キチ ) 
) り ポシェット で は 、 す っ か りお な じみ に な っ 
た 工作 者 の た けち ゃ ん で す 。 テ クボ ポリ 見 て な 
い 人 は 、 4 ヵ月 ぶり の こと で 忘れ て る 人 も い 
だ り し で 7 (ダグ メ で すそ ーッ ) 

秋 と いえ ば 、 食 欲 の 秋 ・ 読 書 の 秋 ・ ス ポー 
ツ の 秋 と いろ いろ あり ます が 、 1 日 24 時 間 か 
ら 、 通 学 十 学 校 オ テク ポリ 十 帰 宅 十 ご は ん 十 


テク ノ ポ リス 増刊 


プロ グラ ム ボ ポシェ エット 第 2 号 


@ 発 行人 山下 辰己 
@ 編 集 人 佐 激 伸 治 


睡眠 を 引く と 、 な ん に も 残ら な い の で す 。 せ 、 
せめ て 、 撮 り だ め た ビデ オ を 見 る 秋 と か 、 
プラ モデ ル を 作る 秋 に な っ た らい いな 。 
(捜索 願 ) この 夏 、 た けち ゃ ん 家 の ポ ケ コ ン 
ちゃ ん (FX-702P ) が 行方 不明 に な っ て し ま 
My ま も た 。 家 で は カセ ッ ド イシン タプ ェ イ スズ と 
プリ ンタ が 泣い て いま す 。 早く 帰っ て くる よ 
6 (た けち ゃ ん ) 
添削 担当 は いま いち 私 で す 。 打ち込み ミス 
以外 に 、 私 の 添削 思想 に 対し て 文句 の ある 人 
は 、 書 面 に て テク ノ ポ リス ・ プ ログ ラム ポ シ 
ェ ッ ト 編 集 部 で ぶ 係 まで 。 し か し 、 結 局 は 私 
が 正しい 予定 で す 。 (で NN 
> で ぶ 大 先生 の 添削 教室 移植 コー ナー 用 プロ 
グラ ム が で き あ が っ た の は 、 こ れ 以 上 お くれ 
る と ポシェ ッ ト が E 刷 し て も ら え な いと いう 、 
ギリ ギリ の 日 の 夜中 だ っ た 。 ぼ く が 、 最後 の 
原稿 を ビシ ビシ 書い て いる 最 中 に 、 で ぶ 大 先 
生か ら お 声 が か か っ た 。「 山 科 ク ン 、 忙 し いか 
ね まき さか 展 し いで すず と いう わけ に は いか な 
いい の で すばやく ヒマ な が さり を し て 、 ぽ ぼく は 
で ぶ 大 先生 の も と へ か けつ けた 。「 先 生 、 つ い 
に で きま し た か /」 す る と 、 で ぶ 大 先生 は ほ 
(まえ まれ て 、「 で きた と も 。 ま あ 、 ち ょ っ と 試 
し に 遊ん で みて くれ ん か 」「 は い 、 豆 ん で 」 で 
ぶ 大 先生 は 、 み ず か ら [RILUIIN] [RET URN| と 、 
手 慣れ た 様子 で すばやく 打ち 込ん で くだ さっ 
た 。 す る と 、 お お 、 画 面 に は …… ア 

?FN ErLOL‥・ 

それ か ら 、 突 然 で す が 67 ペ ー ジ の コラ ム も 
よろ し くね 。 (For without 山科 ) 
ぉ 中山 農園 事件 と いい 、 純 真 ム ク で カワ イイ 
じゃ ん / これ か ら は HH を 卒業 し て まがい も 
の 人 生 を 歩む ん だ い 。 今日 も 空 は 青い ぜ 。 
(ジャ ム と 釜めし よ 永 遠 に …… ハ ッ ト リ く ん ) 


@ 編 集 担 当 プ 山森 沿 
人 @ 編 集 山 科 教 之 


表紙 デザ イン グ 鈴 木 俊 明 
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@ 本 文 デ ザイ ンプ ス ズ キ トシ アキ デザ イン オフ ィ ス ・ 高橋 典子 
⑱ イ ラス トノ と り い か ず よ し ・ 増 田 秀 美 ・ お お ば みわ ・ 橋 岡 正和 


人 写真 / 和 萩原 修 


@ 還 刷 | 凸版 印刷 株 


徳間 書店 1984 本 誌 掲載 の 写真 イラ スト 、 記 事 お よび プロ グラ ム 


の 無断 転載 を 禁じ ます 。 


食 技 術 / 橋 岡 正和 * 松下 武 諭 e 永吉 敏男 ・ 渋 谷 
@⑯ フ ィ ニ ッシュ ・ デ ザイ ン ノ 伯 代 文 新 社 


うわ る の テレ ビ 、 こ れ - 友 あれ ば お 楽し み は マ ル チ 。 テレ ビ と 
し て 15 形 FS ブ ラウ ン 管 で 一 段 と 鮮明 。 ジョ イス ティ イッ ク を つ な 
げ ば テレ ビ ゲ ー ム 機 に 。 パソ コン と し て キー ボー ド を つなげ ば 
本 格 的 パソ コン に 。 一 友 で 大 満足 の 新しい 高 性 能 テ レビ 、 
ゼネ ラル の ~ パ クソ ン ”。 も う 、 離 れ た 〈 く ない 、 離さ な い 。 


W 
テレ ビ 本 体 に MSX パソ コン を 内 蔵 。 合体 成功 の 高 性 能 テ レビ と 


テ レ ビ PCT-50 形 (15 形 ) 標準 価格 128,000 円 
ジョ イス ティ ッ ク PCJ-50 形 標準 価格 (1 コ ) 3,500 円 
キー ボー ド PCK-50 形 標準 価格 18,500 円 


の ひ 放 ラ A& に テレビ 


ー 5 8 1 1 0 6 準 
| | 上 RAM カ リッ ジ RJ02 形 回 8000 有 
写真 シル バー(S に = ココ = NRJyWRBR ば 学習 プロ グラ ム な ど 容 量 の 大 き な 32KB( キ ロバ イ 


他 に レッ ド (R) も あり ます ト ) 表示 の ソフ ト を 利 用 で きま す 。 


人 @ RGB 回 路 直 結 で グラ フィ ッ ク 表 示 や 小さ い 文字 も 鮮明 表示 草 パ ソコ ン の 画面 ズレ が な く 調 整 不要 人 テレ ビィ ー つ パソ コン の 切り 換え も 
ワン タッ チ 。 ア ン テ ナ 線 の 脱 や 配線 の 手間 も 不要 便 2.000 文 字 表 示 能 力 の 高 精度 15 形 FST 採 用 人 有線 放送 (ミッ ドバンド ) も 受信 可能 


@ お 問合せ は 株式 会 社 ゼ ネ ラ ル 国内 営業 事業 部 開発 商品 課 吾 213 川 崎 市 高津 区 末 長 1116 番 地 容 044(866) 1111( 大 代表 ) 
※ ご 購入 の 際 は 、 購 入 年 月 日 、 販 売店 名 な どの 所 定 事項 を 記入 し た 保証 書 を 必ず お 受け と りく だ きい 。 記 S メ 4 は マイ クロ ソフ ト 社 の 商標 で す 。 


この 秋 . コ ナニ の 
可 に の 対応 ソフ ト 


ら と の けら の の 


多 ろ 6 ひ 
96 


ハイ バー スポ ボー ツ 1 \4.800 
HYPER SPORTS 型式 RC715 
④ ダ イ ビ ン グ @ 呪 馬 ( ち よう ば ) 

③ ト ラン ボリ ン 鉄棒 


ーー ント 


モノ 人 人 お 0 いち に さん 9 う \4.600 
MONKEY ACADEMY 型式 RC702 
敢 を か わし 、 ロ ー ル を お ろ し て 答え を 
さがせ / モン 太 君 は 算数 の 天 オ 時 間 
内 


に 何 問 解け る 


N 
NN 


1LOVE 田 数 


スー バー コブ ラ ぎ \4.000 
ダイ ハム バイ ロット ぎ 4800 


プロ ッ ツガ ー \4.000 


ハル 八 -ー オ ルル ピッ ク 1 \4.800 
HYPER OLYMPIC 困 型式 RC710 
④100m ダ ッ シ コ @ 走 り 幅 飛び 
③ ハ ンマ ー 投 げ @400m 競 直 


ルー オリ ピッ 2 \4800 
HYPER OLYMPIC 回 | 型式 RC711 
④110m ハ ー ド ル ② ヤ リ 投 げ 
走り 高 飛 び @1500m 競 中 


ぽん ば ぼ ば ご こ パ バン ぎ \4800 


けつ きよ く 有 十 極 條 険 \4.800 


COMIC BAKERY 型式 RRO714 ANTARCTIC ADVENTURE 型式 RC701 
ご こ ご は オー トメ バン 工場 。 お や お や !P ベン ギン 君 、 ス ケー ト で 南極 大 陸 一 周 。 
タメ ヌキ が ガバ パン を ね ら つ て ウロ チョ ロ 。 アザ ラ シ を さけ 、 遇 を キヤ ツチ / さあ 
パン 職人 の ジョ ー は パン を 守れ る か ガ 。 量 地 は 目前 だ 。 


PE ちち ゎ ち oo 
3 の OO の つの ひい 
レーン 


に KA 


コナ ミ の 麻雀 道場 \6.000 サー カス チャ ヤー リー ぎ \4.800 


KONAMIS MAHJONG 型式 RC707 CIRCUS CHARLIE 型式 RC712 
MSX 麻 雀 ゲ ー ム の 本 命 登場 / 本物 の さあ さあ お 立 台 い 。 世 紀 の 芸 当 の は じ 
ゲー ム 指 向 は 当然 、 得 点 計算 で は な ん まり は じ ま り 。 チ ヤー リー 頑張 れ / 
GREAT / FAROUT / 


1LOVE O 理 


昭 P デ て 


1LOVE 社会 


2 ーー 1TnE28858 AMrS4934 マ 


較 通 信販 売 て で も お 求め で きま す 
@ 現金 書留 て ご 注文 の 場合 … 住 所 ・ 氏 名 ・ 電 話 番 号 ・ 商 品名 


コナ ミ マ イコ ン 


TIME PILOT 
襲い 来る 届 ナ 機 を 次 々 と 撃ち 沙 せ / 


FROGGER 
帰り だ いけ ご ど 危 険 が いつ ば ぱい 。 お 家 を めざし て ジャ ンプ / 


と 符 の 解説 まで 詳細 に 表示 。 


財 科 半 


SUPER COBRA 型式 RC705 敵 の 対空 攻撃 は 激しい ぞ 。 高 射 砲 が 、 
ミサ イル が 、UFO 〇 が …。 へ リコ プター で 、 ど こま で 進め る か や 
型式 RC703 時 空 を 超え だ 戦闘 機 の 空中 コン バッ ト 。 


型式 RC704 僕 は まい ご の わん ば ぱく ガエル 。 お 家 へ 電 (大阪 駅 前 第 4 ビル 1706 号 ) 


クラ ブフ 会員 募 集 / 


xs に も 、 コミ ュ ニ ケー ショ ン 
窟 。 の 場 を 生か し ませ ん が / 
会 員 特 典 ) 
D 事 務 局 に ソフ トウ ェ ア 開 発 支援 装置 、 
国内 外 の パー ソナ ルコ ンピュータ (ハー 
ド ・ ソ フト ウェ ア ) 技術 情報 誌 を 自由 ( 
使用 する こと が で きま す 。 
2 クラ ブフ 内 ・ 外 部 で 開発 され た 優れ た マ 
イコ ン の ハー ド ・ ソ フト ウェ ア は 、 商 品 
(9 る NG の Sg③ き きま の 
| 3③ マ イコ ン に 関す る 講習 会 、 講 演 会 に 優 
l 待 参加 で きま す 。 
時 (④ 会 員 証 、 バ ッ ジ を 供与 いた し ます 。 
(に 


会 手続 ) @ 入会 金 1.000 円 
@ 年 会 費 2.400 円 (月 200 円 


虹 


上 le 事務 局 ノ 大 阪 市 北 区 梅田 1 丁目 
上 番号 1215 r コ ナミ マイ コン クラ ブ 」f 


上 
上 
財 


。 全 06( 345 )2456 担当 者 矢 谷 


HHEEHHHRHHHH 


を は っ きり 書 いて 、 商 品 価格 (送料 \500) の 合計 金額 を お 送 
りく だ さい 
@ 銀行 振込 で ご 注文 の 場合 … 下 記 の 銀行 口座 へ 合計 金額 を 
振込 ん て で ください. 振込 後 、 ハ ガキ て 住所 ・ 氏 名 ・ 商 品名 を ご 連 
絡 く だ さい 
< 折込 先 > コナ ミ 株 式 会 社 ・ 第 1 勧業 銀行 ・ 市 ヶ 谷 支店 ・ 普 通 1073435 


KOonami。 


SOFTWARE 
コナ ミミ 株式 会 社 


東京 都 干 代田 区 九段 南 2 丁 目 3-14 TEL. 03(262)9111( 代 ) 


@ MSX マ ー ク は マイ クロ ソフ ト 社 の 商標 で す 
@ この 商品 は 、 弊 社 (コナ ミ ) の 応 諾 な し に 海外 へ の 出荷 は で きま せん 


E 届 | 


〇 徳間 書店 "1984 


凸版 印刷 雑 誌 06450 一 10 


Printed in Japan 


・ 剖 机 。 恒 


LU ャ ーー ペー mLL NN に 


( 計 ) こ らら の (6 の ょ ) の ら 天 涯 


(cntokS っ ) oO の UNHLS 役 各 


避 L 


(CI 


